タグ

2013年7月4日のブックマーク (12件)

  • 変換

    vab excel の基は、Range Cells プロパティです。 vba excel range cells 簡単です! 変換 vba excel rangeと cells プロパティは、相互に変換できます。 Range.Address プロパティ は、番地を表す文字列型 (String) の値を返します。 一方、Cellsプロパティは、一つひとつのセルを返します。 Range(Cells(1, 2).Address)は、Range("A2")を表します。 したがって、 CellsプロパティをRangeプロパティで表すことができ、変換できたことが分かります。 一方、Rows(2) は、アクティブシートの2行目を表す Rangeオブジェクトです。 このオブジェクトによりA2セルにアクセスできません。 Rwos(2).Cells(1, 1) のようにCellsによって、初めてA2セルにア

    変換
    watanata2000
    watanata2000 2013/07/04
    Cells → Range 変換
  • VBAで正規表現を使う

    はじめに 改めて言うまでもないことですが、文字列処理で正規表現が使えると非常に便利です。VBAで正規表現を利用する方法を紹介したいと思います。 対象読者 VBAで正規表現を使用したい方 VBAで煩雑な文字列処理の行う必要のある方 なお、「正規表現についてよくわからない」という方は、以下のページの解説などを参考にしてください。 サルにもわかる正規表現入門 必要な環境 Windows VistaまたはWindows XP VBA開発環境 正規表現を使う前に VBAで文字列比較を行う場合、標準の機能としてStrComp関数やLike演算子があります。 特にLike演算子は、ワイルドカードなどによるパターンマッチングが行えます。正規表現よりも柔軟性は劣りますが、実現したい機能がLike演算子で済むのならば、無理に正規表現は使わずLike演算子を使った方がよいと思います。詳しくは、ヘルプにあるLik

    VBAで正規表現を使う
    watanata2000
    watanata2000 2013/07/04
    Excel VBA 正規表現 使い方 メニュー「ツール > 参照設定」
  • RegExpオブジェクト:Excel VBA入門

    watanata2000
    watanata2000 2013/07/04
    正規表現、パターン、使い方
  • Office TANAKA - セルの操作[セル範囲の取得]

    操作の対象セル範囲が不定の場合 ここまでの解説では、操作の対象を「セルA1に」とか「セル範囲A1:C3に」などと簡単に決めてきました。もちろん解説なのですから、それは勘弁していただきたいのですけど、実際のマクロ作成では操作の対象を特定することに苦労するものです。操作の対象セルを、どう的確に特定するかが、VBAのビギナーとベテランで差が出るところでもあります。たとえば、次のようなデータを考えてみましょう。 このデータをマクロでクリアします。ただし、データが何行何列あるかは、そのときによって異なります。セルをクリアするにはRangeオブジェクトのClearContentsメソッドを使います。次のコードはセル範囲A1:D5をクリアします。 Sub Sample1() Range("A1:D5").ClearContents End Sub クリアすべきセル範囲の左上はセルA1です。したがって、セ

    watanata2000
    watanata2000 2013/07/04
    セルから行を操作、CurrentRegion UsedRange SpecialCells 使い方 ★★★
  • クレジットカード現金化の高還元率の優良店を選ぶためには

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

    watanata2000
    watanata2000 2013/07/04
    セル、行、列の扱い方 基本
  • No.8 ワークシートの最終行、最終列を取得する

    ワークシートの最終セル(最終行、最終列)を取得する… VBAをはじめた人は誰しも最初に引っかかる問題ではありますが、幸いにもインターネットで検索するといくつもの解決法が見つかります。 ところが…動いたり動かなかったり、想定外の動作をすることがあります。そもそもいくつもの解決法があること自体おかしい、いったい当の答えはどれ?この際、白黒はっきりさせようじゃないかというのがこのページの趣旨です。 <S1> ワークシートの最大行、最大列を取得する MaxRow = Rows.Count MaxCol = Columns.Count まず基からですが、ワークシートの最大行、最大列を取得するコードです。もちろんこれ自体は最終行、最終列を取得するものではありません。 Rowsはワークシートの行全体をあらわすオブジェクトで、Columnsは列全体をあらわすオブジェクトです。そのメソッドCountは数

    watanata2000
    watanata2000 2013/07/04
    最終行、最終列の取得
  • 第6回 指定フォルダ内のファイル名一覧をExcelに書き出す

    Microsoft Excel 2000/2003(FileSystemObjectが使えるWindows)。うまく動作しないときはWSHをバージョンアップしてみてください。 プログラミングをしていると,「プログラム・ファイルの構成一覧をExcelで用意してくれ」と言われることがよくあります。手作業だと面倒なんですよね,こういう作業。で,ExcelVBA(Visual Basic for Applications)を使う方法を紹介しちゃいます。マクロだったら記入漏れやミスタイプもありません。 今回作成するファイル一覧生成マクロは,Excel/VBAを使って,指定されたフォルダ(ディレクトリ)にあるファイルの名前とファイル種別,最終更新日,コメント用の空欄を自動で生成します(図1[拡大表示])。大量のHTMLファイルや画像ファイルを扱う,PHPPerlなどのWebプログラマの方なら,

    第6回 指定フォルダ内のファイル名一覧をExcelに書き出す
    watanata2000
    watanata2000 2013/07/04
    FileSystemObject FSO 並び順 → Excel のソート機能を使うべき ★
  • FileSystemObjectのGetFolderで取得できるファイルの並び順 - Visual Basic - 教えて!goo

    watanata2000
    watanata2000 2013/07/04
    FileSystemObject FSO ソート順 並び順 指定不可 ADO でソートする
  • Office TANAKA - FileSystemObject

    FileSystemObjectオブジェクトは、ドライブ・フォルダ・ファイルなどを操作できるオブジェクトです。FileSystemObjectオブジェクトは、Scrrun.dllファイル内のスクリプティングタイプライブラリとして提供されます。 VBAからFileSystemObjectオブジェクトを利用するには、CreateObjectメソッドを実行してFileSystemObjectオブジェクトのインスタンスを作成し、そのインスタンスに対してプロパティの設定やメソッドを実行します。ここでは、FileSystemObjectオブジェクトのプロパティやメソッドのリファレンスと、使い方のサンプルを解説します。 なお、文の内容はExcel VBAでの操作を前提に書きますが、AccessなどのVBAや、VisualBasic(VB)からも同じ考え方でFileSystemObjectオブジェクトを

    watanata2000
    watanata2000 2013/07/04
    FileSystemObject FSO 解説 ★★★
  • Office TANAKA - VBA講座:ファイルの操作(ファイルの一覧を取得する)

    任意のフォルダに存在するすべてのファイル名を取得するには、Dir関数にワイルドカードを指定します。次のコードは、C:\Sampleフォルダに存在するすべての「*.xlsx」をアクティブシートに書き出します。 Sub Sample1() Dim buf As String, cnt As Long Const Path As String = "C:\Sample\" buf = Dir(Path & "*.xlsx") Do While buf <> "" cnt = cnt + 1 Cells(cnt, 1) = buf buf = Dir() Loop End Sub Dir関数にワイルドカードを指定して実行すると、まずそのワイルドカードに一致するファイル名が返ります。次に、Dir関数の引数を省略して実行すると、前回に指定されたワイルドカードが指定されたものとしてファイルを探します。そ

    watanata2000
    watanata2000 2013/07/04
    ファイル一覧取得
  • Excel VBA 入門講座 文字列操作関数

    Replace("対象文字列","置換前の文字(列)","置換後の文字(列)",検索開始位置(省略可),置換回数(省略可),比較モード(省略可)) strSamp = "123456789" strSamp = Replace(strSamp, "123", "000") '000456789を返す strSamp = "111122223333111122223333" strSamp = Replace(strSamp, "1111", "0000", 5) '22223333000022223333を返す strSamp = "111122223333111122223333" strSamp = Replace(strSamp, "1111", "0000", 1, 1) '000022223333111122223333を返す strSamp = "111122223333111

    watanata2000
    watanata2000 2013/07/04
    文字列操作 ★
  • sublimetext2で印刷・プリントアウトする方法 | twelvelab

    元気にsublimetextしてますか?sublimetext2から印刷を行う方法を調べたので書き留めておきます。 手順は非常に簡単でパッケージマネージャから『print to HTML』をインストールするだけです。パッケージインストール後はWindowsの場合ctrl + shift + p, Macの場合cmd + shift + pで印刷可能です。ブラウザを介してHTMLとして印刷されるみたいです。

    watanata2000
    watanata2000 2013/07/04
    印刷 プリントアウト