タグ

2014年11月5日のブックマーク (5件)

  • シートをアクティブにする

    Excel VBA を使って指定したワークシートをアクティブにする方法を解説します。アクティブになったワークシートと言うのは、一番前面に表示されているワークシートのことです。一度にアクティブにできるワークシートは1つだけです。

    シートをアクティブにする
  • Office TANAKA - Excel VBA(エラーに負けない)

    マクロ開発者にとってエラーは嫌なものです。できればエラーメッセージは見たくありませんし、対処のしかたに慣れていないと、エラーの原因を解明するために思わぬ時間が必要だったりもします。もちろんエラーは発生させないのが一番ですが、そうも言っていられません。ここでは、エラーを回避するテクニックをご紹介します。 エラーを無視する たとえば次のコードは、ワークシート名を取得して表示します。 Sub Sample1() Dim i As Long, buf As String For i = 1 To 4 buf = buf & Worksheets(i).Name & vbCrLf Next i MsgBox buf End Sub しかし、For Nextの繰り返しを4回実行しているため、ワークシートが3枚以下だとエラーになります。 For Nextのループ中でエラーが発生してマクロはストップします

  • クレジットカード現金化の高還元率の優良店を選ぶためには

    クレジットカード現金化の高還元率の優良店を選ぶためには クレジットカード現金化の優良店を選ぶポイントは、換金率やスピードもありますが、そのほかにも見ておきたいポイントもあります。 お金に厳しい人が利用しますので、手数料やキャンペーンの有無、価格交渉ができる業者ということは見ておきたいところです。 それぞれどのような内容なのでしょうか。 手数料が無料であるクレジットカード現金化の業者には、手数料をすべて無料でしてくれるところがあります。 業者によっては、単純に手数料という名目で業者側の利益がとられていたり、振込手数料、事務手数料という名目で少額ながらお金がかかることがあります。 せっかく高い換金率が記載されていても、手数料の分が差し引かれることで、損をしたような気持ちになったり後から気づくこともあります。 これらの手数料は最初から公式ホームページに記載がある場合は了承したうえで申し込みもでき

  • 文字列検索-Findメソッドの応用:Excel VBA|即効テクニック|Excel VBAを学ぶならmoug

    ツイート 特定の文字列をセル範囲から検索するにはFindメソッドを使用します。 Findメソッドが検索結果として返すセルを対象に、さまざまなことを行うことが出来ます。 たとえば、検索結果のセルの背景色を変えたり、セル内の検索文字列のフォントを操作したり、隣合うセルを結合するなど、セルの操作で可能なことをFindメソッドの検索結果に対して行うことが出来ます。 ここではFind/FindNextメソッドを組あわせた応用例をご紹介します。 ■検索結果のセルに含まれる検索文字列のフォントを操作する 次のサンプルは、ダイアログボックスで指定した文字列を検索し、セル内にある検索文字列のみ赤・太字に設定します。 ●サンプル1● Sub PaintTargetCharacter() Dim Target As String Dim FoundCell As Range, SearchArea As Ran

  • シート名の取得(セルと配列に格納):Excel VBA|即効テクニック|Excel VBAを学ぶならmoug

    ツイート ブックの中の全てのシート名を取得して、セルまたは配列に格納します。 サンプル1はFor Each...Nextステートメントを使って、ブックの中の全てのワークシート名をセルに書き出します。 ●サンプル1● Sub Sample1() Dim mySheet As Worksheet Dim myRow As Long myRow = 1 For Each mySheet In Worksheets '---(1) Sheets("Sheet1").Cells(myRow, 1).Value = mySheet.Name myRow = myRow + 1 Next End Sub ワークシートだけでなく全てのシートを対象にするには、Sheetsコレクションを使用します。(1)の「Worksheets」を「Sheets」に変更すると、グラフシートも含めた全てのシート名を書き出します