VBA セル値からフォルダー名を取得して作成
2010年 05月 14日
↓のようにA列のセル値の値をフォルダー名として作成するマクロです。
「フォルダ作成」のボタンをクリックすると、
a0030830_7161349.gif

指定したフォルダにセル値の値をフォルダー名としてフォルダが作成さrます。
a0030830_7161919.gif



Sub セル値からフォルダー名を取得して作成()

Dim mydir As String
Dim i As Integer

For i = 1 To Range("A" & Rows.Count).End(xlUp).Row
mydir = "C:\Users\user\Desktop\test\" & Cells(i, 1).Value
If Dir(mydir, vbDirectory) = vbNullString Then MkDir mydir
Next i
MsgBox "完了しました"

End Sub
by hama_y | 2010-05-14 07:18 | Excel |▲TOPへ

<< VBA セルの値をブック名にし... Googleの検索画面が変わりました >>



パソコンのお役立ち機能を一緒に学びませんか?[初心者のためのOffice講座 hamachan.info]のサポートブログです。
by はま
サイト内検索
記事ランキング
最新の記事
既定のメールクライアントが設..
at 2017-06-27 18:45
ゴールシークのボタンの位置
at 2017-06-24 09:53
IMEのシステム辞書の[標準..
at 2017-06-14 20:45
ピボットテーブルのフィールド..
at 2017-06-11 21:22
ピボットテーブルの日付のグル..
at 2017-06-03 14:13
リンク
カテゴリ
全体
Windows
IME
Office共通
Word
Excel
PowerPoint
Access
Outlook
Internet Explorer
Outlook Express
ホームページビルダー
ATOK
一太郎
筆まめ
筆王
筆ぐるめ
PhotoshopElements
ネットワーク
PCインストラクター
ああ~お客様
(@_@)
iPhone
SharePoint
未分類
以前の記事
2017年 06月
2017年 05月
2017年 04月
more...
検索
外部リンク