Excel VBA 質問スレ Part83 (629レス)
Excel VBA 質問スレ Part83 http://mevius.5ch.net/test/read.cgi/tech/1749348402/
上
下
前次
1-
新
通常表示
512バイト分割
レス栞
抽出解除
レス栞
123: デフォルトの名無しさん [sage] 2025/06/17(火) 22:59:55.51 ID:GVNfPl9u vbaでGitHub Copilot使ってる人いる? http://mevius.5ch.net/test/read.cgi/tech/1749348402/123
141: デフォルトの名無しさん [sage] 2025/06/19(木) 00:43:27.51 ID:qitj2LBq 横だけどそもそもイントラのフォームに入力とかが本当に必要なの? うちは225だけどイントラから特定条件でデータを落とすようなよくあるユースケースなら素直にGET,POSTすれば済むのもたくさんあるぞ http://mevius.5ch.net/test/read.cgi/tech/1749348402/141
154: デフォルトの名無しさん [] 2025/06/19(木) 20:13:36.51 ID:QChnVNm1 Staticだったら信頼性が上がりますか? http://mevius.5ch.net/test/read.cgi/tech/1749348402/154
251: デフォルトの名無しさん [sage] 2025/06/26(木) 09:03:49.51 ID:zNLvgnZA 上か下かではなく、特定しやすく変化しにくそうな要素を狙うのがスクレイピングの基本 一般的には、idが付いている要素が最優先、次点で特徴的なclass こんな教科書的な答えはAIに聞いた方が早いし丁寧な回答貰えるよ http://mevius.5ch.net/test/read.cgi/tech/1749348402/251
317: デフォルトの名無しさん [] 2025/07/01(火) 21:04:55.51 ID:hLMayhbM >>316 何をお作りになられたのでしょうか? http://mevius.5ch.net/test/read.cgi/tech/1749348402/317
361: デフォルトの名無しさん [] 2025/07/05(土) 09:10:19.51 ID:+boHNEOG >>357 csvファイルへのショートカットだった場合のチェックがない 開くと読み込みを一緒にしているのが気になった その前にもともと自力でできる作業なら初めからAIは使わないだろうし AIが示さない項目を無視していいかの判断ができるのかな 主な項目だからそれ以外もあるよとか後になって言うのはどうかと思うし http://mevius.5ch.net/test/read.cgi/tech/1749348402/361
439: デフォルトの名無しさん [sage] 2025/07/19(土) 09:32:36.51 ID:S5W6kZB3 指定したフォルダ以下の、サブフォルダとファイルを取得する記事も見付けた >>433 のは、フォルダのみだけど、その中身もそのファイル情報も見れるのはいい 何よりシンプル 開きたい場合は上のを参考にすればいいと思う https://akira55.com/showfoldertree/ ExcelにTreeViewって無かったっけ?とか思い直してググってて辿り着いた TreeViewを実装しようと試みて、みんな大好きTANAKAさんのサイト参考にしようとしたら Form上に配置するのに、その他のコントロールから選ばなきゃならなく成ってて ImageListに至っては追加はできてもプロパティ変更しようとするとエラー 64bitのせい? TANAKAの例はExcel2003で説明してるからなのか もはやオワコンなのか なぞ まぁ、後日のメンテとかも面倒そうだから、Sheet上に書き出すのがいちばん楽なんだろうな http://mevius.5ch.net/test/read.cgi/tech/1749348402/439
520: デフォルトの名無しさん [] 2025/08/01(金) 10:40:10.51 ID:R6RHAbIb 昨日まで使ってたのが急にエラー出るようになったけど何が原因か分からなかったのでアドバイス下さい 使用マクロ Sub 表作成() Dim ws1 As Worksheet Set ws1 = ThisWorkbook.Worksheets("記") Dim cmax1 As Long cmax1=ws1.Range("A1048576").End(xlUp).Row With ws1.Sort .SortFields.Clear .SortFields.Add Key:=ws1.Range("A2"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal .SetRange ws1.Range("A3:L" & cmax1) .Header = xlNo .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With Columns("E:E").ColumnWidth = 0 Columns("I:I").ColumnWidth = 0 Columns("K:K").ColumnWidth = 0 ActiveWorkbook.SaveAs Filename:="C:\Users\User\Documents\ファイルパス\請求書" & " " & Format(Date, "yyyymmdd") & ".xlsx", FileFormat:=xlOpenXMLWorkbook End Sub エラー内容 ファイル'C:\Users\User\Documents\ファイルパス\請求書\7E1A4F10'にアクセスできません http://mevius.5ch.net/test/read.cgi/tech/1749348402/520
メモ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.031s