2009-10-01から1ヶ月間の記事一覧

カイジ

みんな恐れるけどバカにしていて 口じゃうまいこと言っても心はねえ・・・・! とどのつまり 独りぼっちよ オレは・・・・! (〜賭博堕天録カイジ和也編(1巻)より〜)

iPhone 3G S(16G)にしました。

なかなか使いやすいです。

指定ディレクトリ内のフォルダ名を表示(その1)の詳細

(その1)の詳細 Dir関数の引数としてディレクトリパスをわたすとディレクトリ内のフォルダ名1つを返します。 Sub aaa() '「C:\work」フォルダ配下のフォルダ名を1つ表示します。 MsgBox folder = Dir("C:\work\", vbDirectory) End Sub ※第二引数には「v…

指定ディレクトリ内のフォルダ名を表示(その3)

サブフォルダの再帰処理(その1)、(その2)ではサブフォルダの取得はおこなってましたが、サブフォルダのサブフォルダの取得はできません。folder\folder1\folder11←「folder1」取得、「folder11」は取得しない folder\folder1\folder12←「folder12」は…

指定ディレクトリ内のフォルダ名を表示(その2)

FileSystemObjectを使用する前回はDir関数を使用しました。 今回は前回と同様の処理をFileSystemObjectを使います。FileSystemObjectは以下のように生成します。 Dim objFS As FileSystemObject Set objFS = CreateObject("Scripting.FileSystemObject")GetF…

Excel VBA 指定ディレクトリ内のフォルダ名を表示(その1)

[ExcelVBA]指定ディレクトリ内のフォルダ名を表示(その1) 前提条件・A1セルにディレクトリパスを入力しておくこと (例:C:\)・サブプロシージャを以下の順で実行すること showFolderCnt1() → showFolderList1() → showLine1() サブプロシージャshowFolder…