Excel VBA 質問スレ Part83

Excel VBA 質問スレ Part83 (784ﾚｽ)
上下前次1-新
抽出解除ﾚｽ栞

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

84: 06/15(日)18:00:52.58 ID:NYF1cX4w(1) AAS
>>80
Copilotの回答

そうですね、VBAの標準的な配列（Array）はサイズを変更する際に ReDim を使う必要があり、特に要素数が頻繁に変わる場合には不便に感じることがあります。そのため、コレクション（Collection）や配列型のオブジェクト（ArrayList, Dictionary）を代替手段として使うことが一般的です。

例えば、Collection は動的に要素を追加・削除できるので、サイズの変更を意識せずにデータを管理できます。

Dim col As Collection
Set col = New Collection

col.Add "Apple"
col.Add "Banana"
col.Add "Cherry"

MsgBox col(2) ' 出力: Banana

また、Dictionary を使えばキーと値の組み合わせでデータを管理できるので、検索や整理が楽になります。

Dim dict As Object
Set dict = CreateObject("Scripting.Dictionary")

dict.Add "A", "Apple"
dict.Add "B", "Banana"
dict.Add "C", "Cherry"

MsgBox dict("B") ' 出力: Banan

このように、用途に応じて Collection や Dictionary を活用することで、動的なデータ管理がしやすくなります。

90: 06/16(月)11:04:03.58 ID:1rbEE5kZ(1) AAS
freeするときhoge=Noneが正解なの？

128: 06/18(水)08:15:48.58 ID:I+q5MYka(1) AAS
GPTだのGTPだのGDPだの、馴染んでいないなら背伸びすんな

297: 06/28(土)22:01:41.58 ID:uA5FL7Cc(3/3) AAS
>>296
変換をon、無変換をoffにしておくと楽

354: 07/04(金)19:13:39.58 ID:3EnEQ/Df(3/3) AAS
>>353
？

417(3): 07/17(木)08:47:01.58 ID:sGHKyXGW(1) AAS
>>410
Dirでワイルドカードが使えるので、こんな感じに仕上げてみた
※ヒットするパスの例 → C:\Documents\A001\B000X1\Excel\20250717\FileABC001.xlsx

HomePath = "C:\Documents"
SearchPath = "A???\B*\Excel\2025????\File*.xlsx"

ResultPath = HomePath
SearchPathList = Split(SearchPath, "\")
For I = 0 To UBound(SearchPathList)
　If Dir(ResultPath) <> "" Then
　　ResultPath = "ファイルの下は何もないよ！"
　　Exit For
　End If
　FolderName = Dir(ResultPath & "\" & SearchPathList(I), vbDirectory)
　If FolderName = "" Then
　　ResultPath = "そんなパスはないよ！"
　　Exit For
　End If
　ResultPath = ResultPath & "\" & FolderName
Next
MsgBox "これかな？" & vbCrLf & ResultPath

418: 07/17(木)09:28:10.58 ID:TqONBLPd(1) AAS
あたしゃ、ディレクトリ関係は「見える」の重視で、このあたり参考にしてワークシート関数でやっちゃうけど
外部ﾘﾝｸ[php]:qwerty.work

508: 07/30(水)22:02:33.58 ID:3dlCCuCF(1) AAS
>>506
ほんそれ
バカの言ってることなんてポンコツなことばかり

551(1): 08/02(土)13:38:37.58 ID:JsttepqD(1) AAS
>>549
AI盲信するバカなやつw

615: 08/06(水)19:28:37.58 ID:YepNzGI4(1) AAS
馬鹿自慢ですか？

641: 08/09(土)07:45:35.58 ID:jRFVkFyh(1) AAS
760万の俺に任せろ

783: 08/26(火)12:52:27.58 ID:tZRcIfkk(7/8) AAS
>>781
「おにいさん」・「おねえさん」という呼称は水商売や性風俗店で多用される呼称

上下前次1-新書関写板覧索設栞歴

ｽﾚ情報赤ﾚｽ抽出画像ﾚｽ抽出歴の未読ｽﾚ AAｻﾑﾈｲﾙ

ぬこの手ぬこTOP 0.029s