- ベストアンサー
フォルダを自動生成するプログラム
- Excelファイルから、８桁の半角数字と複数の全角文字を結合したフォルダ名を生成するプログラムを作成したいです。
- フォルダ名は、各行の数字と文字を結合した形式で作成されます。
- 生成されたフォルダは、Excelの各行に対応して作成されます。
- zyaba
- お礼率46% (261/566)
- その他（プログラミング・開発）
- 回答数7
- ありがとう数3
- みんなの回答 （7）
- 専門家の回答
質問者が選んだベストアンサー
その他の回答 (6)
- piroin654
- ベストアンサー率75% (692/917)
- piroin654
- ベストアンサー率75% (692/917)
- nora1962
- ベストアンサー率60% (431/717)
- piroin654
- ベストアンサー率75% (692/917)
No2です。 使っていないものが残っていました。 コード中の、 Dim L2 As Long L2 = 1 L2 = L2 + 1 変数L2は使っていないので、コメントアウトするか 削除しておいてください。あっても何もしませんが。
お礼
まことにありがとうございます。 ご教示いただいた方法でできました！ ”フォルダ入れ”というフォルダに格納するようにされていますが、 エクセルデータがあるカレントディレクトリ内にフォルダを生成するにはどのようにしたらよろしいでしょうか？ strPathを色々といじりましたが、どうしてもエラーになってしまい解りません。
- piroin654
- ベストアンサー率75% (692/917)
- nora1962
- ベストアンサー率60% (431/717)
http://officetanaka.net/excel/vba/filesystemobject/filesystemobject.htm FileSystemObjectのCreateFolderメソッドを用いればできると思います。 作成前にExistsFolderメソッドですでにあるかどうか調べたほうがいいと思いますが。
お礼
ありがとうございます。 ご教示いただいた方法ですと、フォルダ名を手打ち入力するようですが、 エクセルデータから引っ張ってくる方法がどうにも解りません。 どうぞよろしくお願いいたします。
関連するQ&A
- フォルダ名の一括変更
プログラムを使って「フォルダ名」を一括変更したいです。 20071203青葉区西池代 20071204豊島区西幾多 20071205西区お茶の子池 20071209江東区上池台 上記のような、「前半に半角英数字8文字、後半に全角文字（漢字・ひらがな・カタカナ）複数文字」 のフォルダが複数ございます。 これらの前半と後半を入れ替え、 青葉区西池代20071203 豊島区西幾多20071204 西区お茶の子池20071205 江東区上池台20071209 上記のような形にしたいと考えています。 これらを一括して変更できる方法はございませんでしょうか？ （cmdやフリーソフトなど使用） どうぞよろしくお願いいたします。
- ベストアンサー
- その他（プログラミング・開発）
- Excelのワークシートを自動生成２
こんにちは、 昨日、ワークシートの自動生成方法を教えて頂いたものです。 皆様からの回答で逆にやりたいことがはっきりしたので再度質問させてください。 ExcelでSheet1のA列の１行目、２行目・・・入力最終行までの各行の文字を ワークシート名にした新しいブックを、自動生成したいです。 昨日は作成するワークシート数を指定しましたが 作成ワークシート数が変わることも想定したく思います。 ご教授のほど、何卒よろしくお願いします。ト
- ベストアンサー
- オフィス系ソフト
- Excelでデータの各値とその個数を生成するには
Excelでデータの各値とその個数を生成するような機能はないでしょうか? 例えば、Excelの A列に1,2,3,2,5,3,2という数値が入力されていた場合に、 B列に1,2,3,4,5という値と、 C列に各値の個数である1,3,2,0,1という値が 生成されるような機能はありますでしょうか。 できれば、A列のデータから、 添付図のグラフを生成させたいです。 なお、上記の例のA,B,C列は一例で、データの数も7個だけですが、 実際には、数百あり、桁数も1～4桁の値です。 よろしくお願いします。(Windows10,Excel2016)
- ベストアンサー
- Excel（エクセル）
- エクセルでひらがな全角～カナ半角の相互への置換方法について
エクセルの文字列の置換ですが、 ひらがな全角文字からカタカナ半角文字への置換。 また、その逆にカタカナ半角からひらがな全角への置換。 方法があれば教えてください。 よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- ひらがなから全角カタカナへの変換の仕方
Perlでひらがなから全角カタカナへの変換の仕方について教えてください。 ここのサイトで「全角カタカナからひらがなへの変換」の仕方が書いてありました。コレを元に逆に指定すれば出来るかな？って思ったのですが。。。どうやればいいのか全くわかりません。たぶんですが文字コードなどで指定しているとは思うのですが。。。どなたかわかる方がいましたら教えて下さい。よろしくお願いします。 #全角カタカナからひらがなへの変換の仕方 $a =~ s/(\x83)([\x40-\x7e])/"\x82".sprintf("%c",ord($2)+0x5f)/eg; $a =~ s/(\x83)([\x80-\x96])/"\x82".sprintf("%c",ord($2)+0x5e)/eg; 上記の逆に「ひらがなから全角カタカナへの変換」出来るようにしたいです。よろしく御願いします。
- ベストアンサー
- Perl
- ＩＭＥスタンダード２００２について
半角／全角（通常、ＥＳＣキーの下）を押すと、普通、あ（ひらがな）→A(半角英数）になるのが、 あ（ひらがな）→カ（全角カタカナ）→カ（半角カタカナ）になってしまいます。 どのようにしたら あ（ひらがな）→A(半角英数）になるのか教えてください。
- ベストアンサー
- Windows XP
- Excel2010 棒グラフ自動生成 空白無視
お世話になります。 MS Excel 2010を使用して、ある一定の範囲から棒グラフを生成したいと考えています。 ただし、この範囲は「データが記述される可能性のある」範囲であって、範囲のすべてにデータが入るとは限らない場合があります。 例えば、データは他のCSVファイル等からCopy & Pasteされるもので、行数はその都度変動するものとします。 データの入る可能性がある範囲A1:B10（A列は名称、B列は数値）で、あらかじめ棒グラフを挿入してあったとして、A1:B6までしかデータが入らない場合だと、A7:B10の分は空白で生成されてしまいます。 下記のいずれかの方法で、データの入った範囲のみの棒グラフを生成するには、どのような方法があるでしょうか。 方法１： データ範囲はA1:B10のままで、空白のセルはグラフ上に表示させないようにする。 （棒グラフであることが前提となります。） 方法２： マクロ等でデータの入った範囲のみその都度選択し、グラフを挿入する。 逆に言うと上記２つの方法くらいしか思いつかないのですが、もっと別の便利な方法をご存知の方がおられましたら、ご教示をお願いします。
- 締切済み
- その他MS Office製品
- 変なフォルダ（＆ファイル）が自動生成します。削除方法は？
変なフォルダ（＆ファイル）が自動生成します。削除方法は？ 昨年８月ごろから思い当たる節のないファオルだがいくつも生成します。 6a57037760765e896aefd9 （2009/1/6：6.12MB） b06844F2c50c885916 (2009/8/9：6.12MB) 83b9ec4362bc1ea0a3a81e8c （2009/11/8：6.12MB） 4a468fbc1a672367761e67 （2009/11/15：6.12MB） a188d76d441b0755b4d7 （2009/12/12：6.12MB） 3fdfc206febedbe72789b1ea3fef1cd5 （2010/1/2：6.12MB） これらのフォルダには全てに(!)am64、(2)i386の２個のサブフォルダがあり、更にその中に７個のファイルを含みます。なお、(!)am64、(2)i386に含まれる７個のファイルはファイルサイズのみ違いますが、ファイル名、種類、更新日時はまったく同じです。 amd64に含まれるファイルは ?filterpiperintproc.dll(144KB)、?msxpsdrv.cat(11KB)、?msxpsdrv.inf(3KB)、?msxpsinc.gpd(1KB)、?msxpsinc.ppd(1KB)、?mxdwdrv.dll(731KB)、?xpssvcs.dll(2,868KB) i386に含まれるファイルはamd54と同一のファイル名ですが、ファイルサイズがfilterpiperintproc.dll(87KB)、mxdwdrv.dll(748KB)、xpssvcs.dll(1,637KB)で他は同じです。 これを削除しようとすると、「ファイルまたはフォルダの削除エラー」が出て、「ディスクがいっぱいでないか、書込み禁止になっていないか、またはファイルが使用中でないか確認してください。」とコメントされます。 使用機器はEpsonDirect製MV-1300H、OSはWindows XO Homeです。 なお、同じくEpson製MR-3500とフォルダ（ファイル）共有設定をして使用しています。
- ベストアンサー
- Windows XP
- エクセルマクロ 次のようなプログラム教えてください
エクセルのマクロで、次のようなことをしたいと思っていますが、 素人でわかりません。 教えていただけますか。 ---------------------------------- ｏ動かしているファイルをa.xlsとします。 a.xlsは、3行目からA列に名前、B列～Ｄ列にデータが入っていて、 各行ごとのファイルを作りたい。（行数は決まっていない） なお、セルE１にある文字が入っている。 ｏ各ファイルは、原紙としてgensi.xlsとして保存されているファイルに、 a.xlsのB～D列のものを入力したものを作りたい。 （B～D列のデータは、gensi.xlsのそれぞれセルC7・C８・C９に入力する） gensi.xlsは、a.xlsと同じフォルダにあります。 ｏ作成場所は、「C:\date」の中に、セルE1にある文字のフォルダ、A列に ある名前のフォルダに作りたい。 （セルＥ1の文字のフォルダは、マクロを初めて実施するときは無いと思います が、2回目からは存在すると思います。A列の名前のフォルダはマクロ実施時 にはありません。作成するファイル名は、Ａ列の名前と同じ（フォルダ名と同じ）.xls にします。） ｏ実行ボタンを３つ作って、１つは今選択されている行のフォルダ・ファイルを作る。 2つ目は数字を入力させて、今選択されている行から入力した数字の行までを一括 で作成する。 ３つ目は、3行目から現在入力されている行すべてを一括で作成する。 ------------------------------- 上記のことをしたいと思っています。 よろしくお願いします。 駄文ですみません。 なお、エクセルは古いバージョンでエクセル2000です。
- ベストアンサー
- オフィス系ソフト
- エクセルでのふりがな表示について
エクセルでふりがなの表示をPHONETIC関数を使ってしていますが、所々カタカナ表示になり、すべてひらがなになりません。例えば、A列の漢字の読みをB列にひらがなで表示したいと思うのですが。A列を並び替えしたときに、B列もそれに対応して並び替えできるようにしたいです。どなたか、ご存知のかた教えて頂けませんか？
- ベストアンサー
- その他（インターネット・Webサービス）
- iPhoneのみで使える機種はどれなのか知りたいです。
- セットアップを含めてiPhoneのみで使えるScanSnapの機種について教えてください。
- ScanSnapやfiシリーズなど、iPhoneのみで使用できる機種について詳細を教えてください。
お礼
教えていただいたコードを色々と変えて利用しています。 どうもありがとうございました。