No.1ベストアンサー
- 回答日時:
Sub try()
Dim myPath As String
Dim myDir As String
myPath = CreateObject("WScript.Shell").SpecialFolders("Desktop")
myDir = myPath & "\" & "abc" 'デスクトップに"abc"と言うフォルダを作る
MkDir (myDir)
End Sub
>セルA2 B2 C2にフォルダの名前にしたい文字や数字があり、
>それをフォルダ名にすることをエクセルでしたいのですが
各セルの値をどうしたいのか不明です。
No.3
- 回答日時:
#1と似たようなものですが...
デスクトップのフォルダー取得
http://officetanaka.net/excel/vba/tips/tips107.htm
フォルダーの新規作成
http://officetanaka.net/excel/vba/filesystemobje …
Sub test()
Dim desktopPath As String, WSH As Variant
Dim FSO
Set WSH = CreateObject("WScript.Shell")
desktopPath = WSH.SpecialFolders("Desktop") & "\"
Set WSH = Nothing
Set FSO = CreateObject("Scripting.FileSystemObject")
FSO.CreateFolder desktopPath & Range("a1").Value
Set FSO = Nothing
End Sub
No.2
- 回答日時:
こんな感じ?
デスクトップのパスはマシン環境で違うので、確認の上設定してください。
Sub test()
Dim i As Integer, f As String, p As String, c() As String
Const cel = "A2 B2 C2" '/←対象とするセル名を列挙
Const pt = "C:\Documents and Settings\デスクトップ" '/←デスクトップのパスを記入
c = Split(cel)
p = pt & "\"
For i = LBound(c) To UBound(c)
f = ActiveSheet.Range(c(i)).Text
If (Dir(p & f, vbDirectory) = "") Then MkDir p & f
Next i
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 【VBA】指定フォルダに格納中のテキストファイルをエクセルで処理し結果のエクセルを新規フォルダに保存 1 2022/03/25 14:19
- Excel(エクセル) フォルダ内のエクセルファイルを開かずにデータ採取する関数式 2 2022/12/22 22:15
- Visual Basic(VBA) エクセルのマクロについて教えてください マクロを実行して 作業フォルダの中にある PDFファイル名を 3 2023/07/01 15:16
- Visual Basic(VBA) サブフォルダ(データ)にある複数の.xlsxファイルのSheet3のA2セルの値で01から左側をB2 2 2022/08/14 15:46
- Excel(エクセル) ExcelVBA メモ帳を起動し名前を付けて指定フォルダに保存 2 2022/04/18 13:15
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/16 14:36
- Excel(エクセル) 【VBA】フォルダAにある2つのファイルの内1つを、フォルダBへ。もう1つを、フォルダBへ移動したい 6 2022/07/26 08:51
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/07/15 16:33
- Visual Basic(VBA) Excel VBA 教えてください。 VBA初心者です。 詳しい方がいましたら教えてください。 下記 3 2023/04/25 11:22
- Visual Basic(VBA) VBA active sheetをPDF化して指定フォルダに保存 1 2022/07/07 11:27
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
Excelでセル内の文字をファイル名にする方法と、下のSheet1タブを2列にする方法は?
Excel(エクセル)
-
VBAでセル値からフォルダ名を取得するコードについて
Excel(エクセル)
-
EXCELのセルの値と同じフォルダー作成
Excel(エクセル)
-
-
4
【Excel】指定したセルの名前でPDFを保存する【VBA】
Visual Basic(VBA)
-
5
エクセルをPDFで保存し、ファイル名はA1セルを参照するVBAの記述を教えてください。
Excel(エクセル)
-
6
excelで複数セル値を組合わせてファイル名にする方法
Excel(エクセル)
-
7
Excelの選択範囲を特定のセル値をファイル名にしてPDFで保存する
Excel(エクセル)
-
8
エクセルVBA セルに表示されたテキストと同じ名前のファイルを開きたい
Excel(エクセル)
-
9
[Excel] ファイル名を変数指定して保存するマクロ
Excel(エクセル)
-
10
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
11
エクセルVBAでセルに入力したパスでブックを開く
Excel(エクセル)
-
12
マクロ始めたばかりです。 デスクトップにあるフォルダをVBAで開きたいのですが
Excel(エクセル)
-
13
VBA 空白行に転記する
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセル 足して割る
-
貼り付けで複数セルに貼り付けたい
-
エクセルのセルの枠を超えて文...
-
【Excel】 セルの色での判断は...
-
対象セル内(複数)が埋まった...
-
セルをクリック⇒そのセルに入力...
-
excelのCOUNTIF関数で、『範囲=...
-
EXCEL 結合されたセルを関数で...
-
エクセルで指定したセルのどれ...
-
エクセルにリンクされるのをし...
-
【マクロ】ボタンを押すごとに...
-
【エクセル】IF関数 Aまたは...
-
エクセルの数式で教えてください。
-
エクセルで空白セル”” と未入...
-
excelのにおいてtabキーで右セ...
-
html テーブルのセルにリンクを...
-
枠に収まらない文字を非表示に...
-
【Excel】特定の文字から文字ま...
-
EXCELで一番安い金額と名前を抜...
-
Excelでのコメント表示位置
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで指定したセルのどれ...
-
【エクセル】IF関数 Aまたは...
-
対象セル内(複数)が埋まった...
-
エクセル 足して割る
-
Excelで数式内の文字色を一部だ...
-
貼り付けで複数セルに貼り付けたい
-
Excelでのコメント表示位置
-
セルをクリック⇒そのセルに入力...
-
EXCEL VBA セルに既に入...
-
excelのCOUNTIF関数で、『範囲=...
-
【Excel】 セルの色での判断は...
-
エクセル オートフィルタで絞...
-
エクセルのセルの枠を超えて文...
-
(Excel)数字記入セルの数値の後...
-
Excelで、「特定のセル」に入力...
-
エクセルの一つのセルに複数の...
-
複数のセルのいずれかに数字が...
-
excelの特定のセルの隣のセル指...
-
数式を残したまま、別のセルに...
-
ハイパーリンクの参照セルのズ...
おすすめ情報