!extend:checked:vvvvv:1000:512
!extend:checked:vvvvv:1000:512
↑同じ内容を2行貼り付けるナリ
ExcelのVBAに関する質問スレナリ
コード書き込みや作成依頼もOKナリ
※前スレ
Excel VBA 質問スレ Part73
https://mevius.5ch.net/test/read.cgi/tech/1631485799/
VIPQ2_EXTDAT: checked:vvvvv:1000:512:: EXT was configured
探検
Excel VBA 質問スレ Part74
■ このスレッドは過去ログ倉庫に格納されています
1デフォルトの名無しさん (ワッチョイ d3fd-v8OD)
2021/12/20(月) 01:40:59.22ID:jnlr9GaR0782デフォルトの名無しさん (ワッチョイ ea4f-stl2)
2022/01/29(土) 16:40:41.52ID:D0pOsND50783デフォルトの名無しさん (ブーイモ MM3e-QqBd)
2022/01/29(土) 16:41:42.31ID:fC9nxr54M だってマクロ書きたいんだもん
784デフォルトの名無しさん (スッップ Sd0a-7nMi)
2022/01/29(土) 16:49:23.58ID:wL4gsmFrd785デフォルトの名無しさん (ドコグロ MMae-YJKT)
2022/01/29(土) 17:04:38.36ID:fQ9LbNHBM >>780
失敗は Fail だもんな
失敗は Fail だもんな
786デフォルトの名無しさん (ワッチョイ 6a7c-lJmG)
2022/01/29(土) 17:04:52.88ID:L/C5gyxS0 俺はcellsだよ、座標として捉えてるから数値との親和性が高く感じる
787デフォルトの名無しさん (ワッチョイ 6a7c-lJmG)
2022/01/29(土) 17:06:06.65ID:L/C5gyxS0 >>785
そやねん、フェイルセーフっていうからその延長で思い込んでしまってたみたい
そやねん、フェイルセーフっていうからその延長で思い込んでしまってたみたい
788デフォルトの名無しさん (ドコグロ MMae-YJKT)
2022/01/29(土) 17:06:09.58ID:fQ9LbNHBM >>781
極端な例だけど Cells(100, 100) がどのセルを指してるのかすぐにわかるなら…
極端な例だけど Cells(100, 100) がどのセルを指してるのかすぐにわかるなら…
789デフォルトの名無しさん (ワッチョイ 6a7c-lJmG)
2022/01/29(土) 17:09:18.89ID:L/C5gyxS0790デフォルトの名無しさん (ワッチョイ ad68-Xc5L)
2022/01/29(土) 17:16:34.10ID:OyQV2dPc0 日本はA1形式なのでどっちにしても分かりづらい
歴史的経緯で今更どうしようもないとは言え、残念すぎる
歴史的経緯で今更どうしようもないとは言え、残念すぎる
791デフォルトの名無しさん (ドコグロ MMae-YJKT)
2022/01/29(土) 17:29:33.23ID:36YHaPQ9M792デフォルトの名無しさん (ワッチョイ 6ada-b3Fm)
2022/01/29(土) 17:59:18.61ID:u7cBLx/b0 >>782
うん。自分の耳が腐っていなければ確かにそれを強調していたように聞こえたよ。。
とにかく後任者の事を第一に考えようと。
あと、速度改善するマクロを書いても後任者が理解できなければそのマクロは結果遅いマクロとも。
一理あるなと思った。
かなり前の話だからうろ覚えごめんなさい。
うん。自分の耳が腐っていなければ確かにそれを強調していたように聞こえたよ。。
とにかく後任者の事を第一に考えようと。
あと、速度改善するマクロを書いても後任者が理解できなければそのマクロは結果遅いマクロとも。
一理あるなと思った。
かなり前の話だからうろ覚えごめんなさい。
793デフォルトの名無しさん (ドコグロ MMae-YJKT)
2022/01/29(土) 18:07:28.04ID:oYmiRtJxM 何が正解かはケースバイケースだしね
LETとかLAMBDAのサポートで正解変わったりするし
LETとかLAMBDAのサポートで正解変わったりするし
794デフォルトの名無しさん (ワッチョイ ea4f-stl2)
2022/01/29(土) 18:58:08.38ID:D0pOsND50 CellsとRangeなんて一長一短なんだから
状況に合わせて使い易い方、分かり易い方を使えばいい。
どうせ両方とも型はRangeだ。
状況に合わせて使い易い方、分かり易い方を使えばいい。
どうせ両方とも型はRangeだ。
795デフォルトの名無しさん (オッペケ Srbd-4IfY)
2022/01/29(土) 19:05:46.63ID:XZlmQtKVr 例えば、数万行の処理をループで回す場合とか
Range と Cells とでは、処理速度が全然違うのよ。
実際にやってみればわかる。
Range と Cells とでは、処理速度が全然違うのよ。
実際にやってみればわかる。
796デフォルトの名無しさん (ワッチョイ 6ada-b3Fm)
2022/01/29(土) 19:07:36.86ID:u7cBLx/b0 Range(A & i)みたいなコードをたまに見るけど、あまり良い書き方ではないと聞きましたよ
797デフォルトの名無しさん (ワッチョイ ea4f-stl2)
2022/01/29(土) 19:10:29.95ID:D0pOsND50798デフォルトの名無しさん (ワッチョイ 6ada-b3Fm)
2022/01/29(土) 19:13:25.82ID:u7cBLx/b0 いわゆる「マクロ入門書」とかにもそのような変な書き方がある。
教える側の立場にある人がそんな書き方してるのはちょっと
教える側の立場にある人がそんな書き方してるのはちょっと
799デフォルトの名無しさん (ドコグロ MMae-YJKT)
2022/01/29(土) 19:49:18.54ID:lAJromTAM >>797
Offset(), Resize() はセル結合を「考慮してくれる」からイマイチ使い辛い
Offset(), Resize() はセル結合を「考慮してくれる」からイマイチ使い辛い
800デフォルトの名無しさん (ワッチョイ a563-ntHq)
2022/01/29(土) 19:57:24.50ID:W/oxWoyf0 可読性と処理速度要件で変えるだけ
801デフォルトの名無しさん (ワッチョイ ad68-Xc5L)
2022/01/29(土) 20:51:43.39ID:OyQV2dPc0 >>795
100万ループさせてやっと数秒か
この程度の差なら速度は誤差では?
速度抜きにしてもrange("a1")って書き方はせんけど
Sub foo()
GetLocalTimeTest
For i = 1 To 1000000
'5秒
'bar = Range(Cells(1, 1), Cells(1, 1))
'2.8秒
'bar = Cells(1, 1)
'6.7秒
'bar = Range("a1")
Next
GetLocalTimeTest
End Sub
100万ループさせてやっと数秒か
この程度の差なら速度は誤差では?
速度抜きにしてもrange("a1")って書き方はせんけど
Sub foo()
GetLocalTimeTest
For i = 1 To 1000000
'5秒
'bar = Range(Cells(1, 1), Cells(1, 1))
'2.8秒
'bar = Cells(1, 1)
'6.7秒
'bar = Range("a1")
Next
GetLocalTimeTest
End Sub
802デフォルトの名無しさん (ワッチョイ a95f-SV2r)
2022/01/29(土) 20:55:44.71ID:2z3KoE650 setは?
803デフォルトの名無しさん (ワッチョイ 6ada-b3Fm)
2022/01/29(土) 21:16:18.07ID:u7cBLx/b0804デフォルトの名無しさん (ワッチョイ 39e6-KfKj)
2022/01/29(土) 21:18:02.94ID:j5q7lOJ70 >>790
いろは順が良かったってか?
いろは順が良かったってか?
805デフォルトの名無しさん (ワッチョイ ad68-Xc5L)
2022/01/29(土) 21:19:19.33ID:zfCLVkWb0 学生大会ね
806デフォルトの名無しさん (ドコグロ MMae-YJKT)
2022/01/29(土) 21:24:22.79ID:1BTFtAsTM807デフォルトの名無しさん (スフッ Sd0a-IClH)
2022/01/29(土) 22:21:59.94ID:tNIxMt6Qd808デフォルトの名無しさん (スップ Sd0a-dw97)
2022/01/29(土) 22:38:28.21ID:FzjWUvLmd809デフォルトの名無しさん (ワッチョイ f1ce-Xc5L)
2022/01/29(土) 22:41:28.05ID:ZRWUeJUN0 ループ回すにはCellsのが書きやすい
810デフォルトの名無しさん (ドコグロ MMae-YJKT)
2022/01/29(土) 22:44:29.32ID:yRT1rOmgM811デフォルトの名無しさん (スップ Sd0a-dw97)
2022/01/29(土) 23:35:26.26ID:FzjWUvLmd 書き方が良くなかったね
自分が作ってる関数だと引数の使い方がRangeの方が汎用性が高い
自分が作ってる関数だと引数の使い方がRangeの方が汎用性が高い
812デフォルトの名無しさん (ワッチョイ 39e6-KfKj)
2022/01/29(土) 23:51:38.36ID:j5q7lOJ70 引数は文字列と言うことかな?
813デフォルトの名無しさん (ワッチョイ 3a00-Bf/t)
2022/01/30(日) 01:33:47.10ID:RkuzR5nc0 作成依頼もOKということで書き込みさせていたただきます。
現在開いているシートの名前で、特定の場所にCSV(コンマ区切り)の形式で保存したいです。
また、エクセルを開きっぱなしで別のプログラムにCSVを読み込ませ、その後データを書き換えてCSVを上書き出力、読み込ませ、データを書き換え…、の繰り返しをしたいのですが、エクセルを開いていると別のプログラムで読み込んだ時にエラーが出てしまうため、別のブックとして保存して閉じることができると嬉しいです。
VBAについての知識がほとんどないため、こういった情報で作成依頼していいものなのかわかりませんが、よろしくお願いします。
現在開いているシートの名前で、特定の場所にCSV(コンマ区切り)の形式で保存したいです。
また、エクセルを開きっぱなしで別のプログラムにCSVを読み込ませ、その後データを書き換えてCSVを上書き出力、読み込ませ、データを書き換え…、の繰り返しをしたいのですが、エクセルを開いていると別のプログラムで読み込んだ時にエラーが出てしまうため、別のブックとして保存して閉じることができると嬉しいです。
VBAについての知識がほとんどないため、こういった情報で作成依頼していいものなのかわかりませんが、よろしくお願いします。
814デフォルトの名無しさん (ワッチョイ f1ce-Xc5L)
2022/01/30(日) 02:59:23.74ID:MQJLXGaO0 >>813
Sub save_sheet_as_csv()
Dim this As Worksheet: Set this = ActiveSheet
Dim sheet_name As String: sheet_name = this.Name 'ワークシート名取得
Dim save_folder As String: save_folder = "c:\tmp\" '保存先フォルダ指定
Dim save_fullpath As String: save_fullpath = save_folder & sheet_name & ".csv"
this.SaveAs Filename:=save_fullpath, FileFormat:=xlCSV 'CSVで保存
End Sub
Sub save_sheet_as_csv()
Dim this As Worksheet: Set this = ActiveSheet
Dim sheet_name As String: sheet_name = this.Name 'ワークシート名取得
Dim save_folder As String: save_folder = "c:\tmp\" '保存先フォルダ指定
Dim save_fullpath As String: save_fullpath = save_folder & sheet_name & ".csv"
this.SaveAs Filename:=save_fullpath, FileFormat:=xlCSV 'CSVで保存
End Sub
815デフォルトの名無しさん (ワッチョイ 3a00-Bf/t)
2022/01/30(日) 03:34:13.23ID:RkuzR5nc0 >>814
ありがとうございます、試してみたところ、出力したCSVを別のプログラムで読み込もうとしたときに「別のプロセスで使用中のため開けません」とのエラーが出てしまいました。
私の使い方が悪いのかもしれませんが、アドバイスいただけるとありがたいです。
ありがとうございます、試してみたところ、出力したCSVを別のプログラムで読み込もうとしたときに「別のプロセスで使用中のため開けません」とのエラーが出てしまいました。
私の使い方が悪いのかもしれませんが、アドバイスいただけるとありがたいです。
816デフォルトの名無しさん (ワッチョイ f1ce-Xc5L)
2022/01/30(日) 03:54:54.88ID:MQJLXGaO0817デフォルトの名無しさん (ワッチョイ 3a00-Bf/t)
2022/01/30(日) 04:02:16.39ID:RkuzR5nc0 >>816
ありがとうございます、うまくできませんでした…。
ネットで拾ったものですが、これがやりたいことに近いかなと思うんですが、保存先の指定はどうすればいいでしょうか。
Application.DisplayAlerts = False 'Excelの警告を一時無視
ActiveSheet.Copy '新しいブックへコピー
ActiveWorkbook.SaveAs Filename:="book1.csv", FileFormat:=xlCSV, Local:=True 'CSVで保存。ファイル名は「book1.csv」。
Workbooks("book1.csv").Close 'book1.csvを閉じる
Application.DisplayAlerts = True
ありがとうございます、うまくできませんでした…。
ネットで拾ったものですが、これがやりたいことに近いかなと思うんですが、保存先の指定はどうすればいいでしょうか。
Application.DisplayAlerts = False 'Excelの警告を一時無視
ActiveSheet.Copy '新しいブックへコピー
ActiveWorkbook.SaveAs Filename:="book1.csv", FileFormat:=xlCSV, Local:=True 'CSVで保存。ファイル名は「book1.csv」。
Workbooks("book1.csv").Close 'book1.csvを閉じる
Application.DisplayAlerts = True
818デフォルトの名無しさん (ワッチョイ f1ce-Xc5L)
2022/01/30(日) 04:58:34.47ID:MQJLXGaO0819デフォルトの名無しさん (ワッチョイ a5d0-26/q)
2022/01/30(日) 07:43:58.44ID:q4Ohgw6D0 >>759
うちの環境だと、FilterオブジェクトにSortはないね
その代わり、ListObject.AutoFilter.Sort.SortFields.Countで検出できそうなのは見つけた
もしかしてこのへんバージョン毎に違ったりするのだろうか?
うちの環境だと、FilterオブジェクトにSortはないね
その代わり、ListObject.AutoFilter.Sort.SortFields.Countで検出できそうなのは見つけた
もしかしてこのへんバージョン毎に違ったりするのだろうか?
820デフォルトの名無しさん (ドコグロ MMae-YJKT)
2022/01/30(日) 09:05:00.91ID:4Di3AbRzM821デフォルトの名無しさん (ワッチョイ 6ada-b3Fm)
2022/01/30(日) 09:32:32.30ID:XZOTMr4+0822デフォルトの名無しさん (ワッチョイ 3a00-VTwM)
2022/01/30(日) 09:32:37.50ID:RkuzR5nc0823デフォルトの名無しさん (ワッチョイ 6ada-b3Fm)
2022/01/30(日) 09:54:20.39ID:XZOTMr4+0 そもそも学生大会があるってのは知らなかった
騒がしてごめんなさい😢⤵⤵
騒がしてごめんなさい😢⤵⤵
824デフォルトの名無しさん (ワッチョイ a5d0-26/q)
2022/01/30(日) 11:04:58.48ID:q4Ohgw6D0 >>820
いやいや、むしろ知らない方法を見つけられたのでありがたかったです
いやいや、むしろ知らない方法を見つけられたのでありがたかったです
825デフォルトの名無しさん (ワッチョイ 6610-lJmG)
2022/01/30(日) 12:45:39.26ID:mFQLQi3M0 VBAももう終わりそうだな
MSはWEB版にしたいみたいだし
MSはWEB版にしたいみたいだし
826デフォルトの名無しさん (ワッチョイ a510-GWmt)
2022/01/30(日) 12:58:15.03ID:+kmkPMy10 不滅です
827デフォルトの名無しさん (ワッチョイ ad68-Xc5L)
2022/01/30(日) 13:00:10.17ID:gD+f1kBW0 終わる要素一切なくて草
828デフォルトの名無しさん (ワッチョイ d9fd-dCld)
2022/01/30(日) 13:13:55.29ID:wiJ8ix3a0 MSがGoogleに頭下げてGASで統一しましょうみたいな交渉を持ち掛けない限りはないだろ
829デフォルトの名無しさん (ワッチョイ 6ada-b3Fm)
2022/01/30(日) 13:18:12.09ID:XZOTMr4+0 確か4.0マクロ廃止とパワークエリはマクロ作業を減らすためにMSが作ったんじゃないのかい?
830デフォルトの名無しさん (ワッチョイ ea4f-stl2)
2022/01/30(日) 18:00:19.55ID:k8uzKlEP0831デフォルトの名無しさん (ワッチョイ ad68-Xc5L)
2022/01/30(日) 18:51:59.67ID:gD+f1kBW0 パワーピボットは本当にスゴイ
なんでもっと早く実装しなかったんだ・・・
なんでもっと早く実装しなかったんだ・・・
832デフォルトの名無しさん (ワッチョイ 66da-Xc5L)
2022/01/30(日) 19:06:51.96ID:DR73eQYX0 ようつべにこんなのあった。
Excelオンラインで最新Excel関数を練習したいという方も必見です!どこまでできるか試してみた!
https://youtu.be/saC7BegnViI
Power Queryは使えないけど
テーブル、スライサー、ピボットテーブルは使える模様。
ただ、スマホの小さな狭い画面だとムリだろな・・・
Excelオンラインで最新Excel関数を練習したいという方も必見です!どこまでできるか試してみた!
https://youtu.be/saC7BegnViI
Power Queryは使えないけど
テーブル、スライサー、ピボットテーブルは使える模様。
ただ、スマホの小さな狭い画面だとムリだろな・・・
833デフォルトの名無しさん (オッペケ Srbd-4IfY)
2022/01/30(日) 19:55:45.81ID:gNdtnnB7r なんで、Access使わないの?
SQL 使えないと不便じゃん。
SQL 使えないと不便じゃん。
834デフォルトの名無しさん (ブーイモ MM81-QqBd)
2022/01/30(日) 19:57:56.80ID:PMeev6woM powerqueryで十分だから
excelだけで完結する
excelだけで完結する
835デフォルトの名無しさん (ワッチョイ 6ada-b3Fm)
2022/01/30(日) 20:17:09.09ID:XZOTMr4+0 Excelオンラインって一部の上級者が食いつき始めていると聞きましたわ
836デフォルトの名無しさん (ワッチョイ ea4f-stl2)
2022/01/30(日) 21:04:21.08ID:k8uzKlEP0 >>833
何故にEXCELでSQLが使えないと思ったのかは聞かないけど
まだSQL初心者でクエリ画面開いてチマチマとテーブル繋いで設定していく
あのACCESSのが使えないかと言われればそれはそう。
でも複雑なSQLを組むようになると結局手で書いた方が早くなるからアレもあまり必要性を感じないけどね。
結局、ADOさえ理解していればACCESSだろうがORACLEだろうがSQLSERVERだろうがその気になれば
EXCELのシートだろうがCSVファイルだろうがEXCEL上からSQLを実施することが出来る。
ただ、本来DBの用途からかけ離れるほど使用に制限を受けるよ。
例えばEXCELのシートやCSVファイルはDELETE文が使えなかったりとか。
何故にEXCELでSQLが使えないと思ったのかは聞かないけど
まだSQL初心者でクエリ画面開いてチマチマとテーブル繋いで設定していく
あのACCESSのが使えないかと言われればそれはそう。
でも複雑なSQLを組むようになると結局手で書いた方が早くなるからアレもあまり必要性を感じないけどね。
結局、ADOさえ理解していればACCESSだろうがORACLEだろうがSQLSERVERだろうがその気になれば
EXCELのシートだろうがCSVファイルだろうがEXCEL上からSQLを実施することが出来る。
ただ、本来DBの用途からかけ離れるほど使用に制限を受けるよ。
例えばEXCELのシートやCSVファイルはDELETE文が使えなかったりとか。
837デフォルトの名無しさん (ワッチョイ ea4f-stl2)
2022/01/30(日) 21:18:16.55ID:k8uzKlEP0 >>835
さっきもちょっと書いたけど
まだ商用か教育機関用のライセンスじゃないと
Javascriptで開発すること出来ないんだよね。
だからJavascriptやってない人は
まだ猶予期間がある内に
Javascript触って慣れておくといいよ。
特にスカラー変数とかまるで
全ての変数はVariant型で扱うかの
ようになったり、
Jqueryとかが出てくると
メソッドを変数に入れたり
チェーンメソッドみたいなのも出て来たり
その前にHTMLやCSSも勉強しなきゃだけど。
さっきもちょっと書いたけど
まだ商用か教育機関用のライセンスじゃないと
Javascriptで開発すること出来ないんだよね。
だからJavascriptやってない人は
まだ猶予期間がある内に
Javascript触って慣れておくといいよ。
特にスカラー変数とかまるで
全ての変数はVariant型で扱うかの
ようになったり、
Jqueryとかが出てくると
メソッドを変数に入れたり
チェーンメソッドみたいなのも出て来たり
その前にHTMLやCSSも勉強しなきゃだけど。
838デフォルトの名無しさん (ワッチョイ ad68-Xc5L)
2022/01/30(日) 21:24:55.59ID:gD+f1kBW0839デフォルトの名無しさん (ワッチョイ ea4f-stl2)
2022/01/30(日) 21:36:30.54ID:k8uzKlEP0 >>838
DELETE使う必要があるかと聞かれれば、
まぁ有った方が便利かも知れないね、という程度。
何せEXCELのシートで条件に合った行が一発で消せるのであればまぁ便利だろう。ただ、
VBAでそういうロジック組めば代用出来ない訳じゃない。
Jqueryが使えるかどうかは俺もまだ
Web版EXCELの開発環境触ったことないから分からんけど、
どっちにしてもJavascriptをやるならついでに覚えて置いた方がいい。とっても便利。
DELETE使う必要があるかと聞かれれば、
まぁ有った方が便利かも知れないね、という程度。
何せEXCELのシートで条件に合った行が一発で消せるのであればまぁ便利だろう。ただ、
VBAでそういうロジック組めば代用出来ない訳じゃない。
Jqueryが使えるかどうかは俺もまだ
Web版EXCELの開発環境触ったことないから分からんけど、
どっちにしてもJavascriptをやるならついでに覚えて置いた方がいい。とっても便利。
840デフォルトの名無しさん (ワッチョイ 668e-ltXr)
2022/01/30(日) 22:15:29.30ID:sjTHXMe20 ID:k8uzKlEP0
またいつもの馬鹿が嘘ばっか書いてる
またいつもの馬鹿が嘘ばっか書いてる
841デフォルトの名無しさん (ワッチョイ ea4f-stl2)
2022/01/30(日) 23:07:47.49ID:k8uzKlEP0 例えばだけど
VBAを生業としているとその内DBとのやり取りを行うようになってSQLは必須になることは理解している人はここにも沢山いると思う。
同様にWeb系を行うならHTMLやCSS、Javascriptの知識が必須になるんだよ。
もしEXCELがWeb主体で扱われるようになるのであればその知識が必要ってだけ。
まぁ確かにスレ違いではあるから
ぼちぼちおいとまするよ。
VBAを生業としているとその内DBとのやり取りを行うようになってSQLは必須になることは理解している人はここにも沢山いると思う。
同様にWeb系を行うならHTMLやCSS、Javascriptの知識が必須になるんだよ。
もしEXCELがWeb主体で扱われるようになるのであればその知識が必要ってだけ。
まぁ確かにスレ違いではあるから
ぼちぼちおいとまするよ。
842デフォルトの名無しさん (スッップ Sd0a-dw97)
2022/01/30(日) 23:34:30.41ID:fPY/YlGjd Excelでやるには面倒なことでほかの言語知っててそっちの方が簡単ならわざわざExcelなんて使わないでしょう
開発者ならそれぐらいわかりそうなもんだと思うけどわざわざ関係ないことを持ち出してくる必要ないのにね
開発者ならそれぐらいわかりそうなもんだと思うけどわざわざ関係ないことを持ち出してくる必要ないのにね
843デフォルトの名無しさん (ワッチョイ 668e-ltXr)
2022/01/30(日) 23:58:36.03ID:sjTHXMe20 >>841
嘘ばっかと指摘されてもしつこく書く馬鹿
嘘ばっかと指摘されてもしつこく書く馬鹿
844デフォルトの名無しさん (ワントンキン MM7a-DCUM)
2022/01/31(月) 02:05:16.34ID:YxHLvxrCM ruby馬鹿だろ
845デフォルトの名無しさん (ワッチョイ f1ce-Xc5L)
2022/01/31(月) 04:36:16.27ID:ByM6Elur0 >>822
Sub save_sheet_as_csv()
save_folder = "c:\tmp\" '保存先フォルダ指定
file_name = ActiveSheet.Name & ".csv" 'シート名をファイル名に
ActiveSheet.Copy '現在のシートを新規ブックへコピー
Application.DisplayAlerts = False '警告を無視して上書き保存できるようにする
ActiveWorkbook.SaveAs Filename:=save_folder & file_name, FileFormat:=xlCSV 'CSVで保存
Workbooks(file_name).Close '新規ブックを閉じる
End Sub
Sub save_sheet_as_csv()
save_folder = "c:\tmp\" '保存先フォルダ指定
file_name = ActiveSheet.Name & ".csv" 'シート名をファイル名に
ActiveSheet.Copy '現在のシートを新規ブックへコピー
Application.DisplayAlerts = False '警告を無視して上書き保存できるようにする
ActiveWorkbook.SaveAs Filename:=save_folder & file_name, FileFormat:=xlCSV 'CSVで保存
Workbooks(file_name).Close '新規ブックを閉じる
End Sub
846デフォルトの名無しさん (ワッチョイ ad68-Xc5L)
2022/01/31(月) 08:22:57.51ID:q62M0ujX0 何が嘘で本当はどうなのかを書けば一発なのに
847デフォルトの名無しさん (ワッチョイ 6ada-b3Fm)
2022/01/31(月) 09:22:06.68ID:KIxAb0730 いやさすがにウソは書き込みしないでいただきたい。
このスレは真面目に勉強したい人もいますので。。
ウソを本当のように書かれると信じちゃうじゃん。
このスレは真面目に勉強したい人もいますので。。
ウソを本当のように書かれると信じちゃうじゃん。
848デフォルトの名無しさん (スッップ Sd0a-dw97)
2022/01/31(月) 09:28:32.59ID:xKkvHIL7d JSとか関係ない話を持ち出してる人のレスが問題なだけでVBAの回答だけなら嘘はないんじゃないの
それと書かれてる内容で勉強したいなら実際に動かしてみるべきだと思うよ
それと書かれてる内容で勉強したいなら実際に動かしてみるべきだと思うよ
849デフォルトの名無しさん (ササクッテロリ Spbd-stl2)
2022/01/31(月) 09:38:43.11ID:9sC6tTKap JSはWebのエクセルの話から派生したみたいだからあながち完全にスレチという訳でもなさそうだな
一応俺も少しJS齧ってはいるけど嘘を書いているようには見えないなぁ
どの辺が嘘なんだろ?
一応俺も少しJS齧ってはいるけど嘘を書いているようには見えないなぁ
どの辺が嘘なんだろ?
850デフォルトの名無しさん (ワッチョイ ad68-Xc5L)
2022/01/31(月) 10:13:50.76ID:zlqGzvHc0 >>849
嘘ではなかった、アドイン入れたらJS使えたわ
ただ、ぱっと触った所vbaでいいとしか思わんかった。慣れてる方が楽でいい
jQueryも使えると思うけど、使う理由はないと思う。あれセレクタ便利になるけど、エクセルjsでは使わないような
ただwebエクセルでの使い方がわからんかったけど、多分一生使わないからもういいや
嘘ではなかった、アドイン入れたらJS使えたわ
ただ、ぱっと触った所vbaでいいとしか思わんかった。慣れてる方が楽でいい
jQueryも使えると思うけど、使う理由はないと思う。あれセレクタ便利になるけど、エクセルjsでは使わないような
ただwebエクセルでの使い方がわからんかったけど、多分一生使わないからもういいや
851デフォルトの名無しさん (スッップ Sd0a-dw97)
2022/01/31(月) 10:25:32.89ID:xKkvHIL7d 自分は嘘と言ってるつもりはないけど話が散らかりすぎてしかもどうでもいいことをダラダラ書きすぎと思ってるけどね
知ってることをいろいろ言いたいのかもしれないけどスレチだってことをわきまえてほしい
知ってることをいろいろ言いたいのかもしれないけどスレチだってことをわきまえてほしい
852デフォルトの名無しさん (ワッチョイ 6dda-LEuf)
2022/01/31(月) 10:46:32.75ID:e1XVzmlT0 Web版Excelのマクロ機能(JSスクリプト)は家庭向け製品では使えない
いまのところ法人向け製品だけの機能
いまのところ法人向け製品だけの機能
853デフォルトの名無しさん (ワッチョイ ad68-Xc5L)
2022/01/31(月) 10:58:28.57ID:zlqGzvHc0 >>852
ああそういうことね、ありがとう
ああそういうことね、ありがとう
854デフォルトの名無しさん (ワッチョイ 6ada-b3Fm)
2022/01/31(月) 11:28:12.04ID:KIxAb0730 まあ、ウソホントの話は置いといてマッタリ平和にやりましょうよ
855デフォルトの名無しさん (ワッチョイ a6da-dw97)
2022/01/31(月) 12:34:07.47ID:/myUa4Xt0 争いが嘘か、平和が嘘か
856デフォルトの名無しさん (ワッチョイ 6610-lJmG)
2022/01/31(月) 12:47:21.32ID:PJdTm1ZT0 JavaScriptと書いてくれ、途中まで理解が噛み合わなかったわ笑
857デフォルトの名無しさん (ラクッペペ MM3e-KfKj)
2022/01/31(月) 12:58:13.56ID:9LYQT6bkM JScriptでExcel.Applicationを扱うのは難しい!
858デフォルトの名無しさん (ワッチョイ 6dda-LEuf)
2022/01/31(月) 12:58:47.12ID:e1XVzmlT0 細かいこと言えば実際はJavaScriptというよりTypeScriptだけど
https://docs.microsoft.com/ja-jp/office/dev/scripts/develop/scripting-fundamentals
https://docs.microsoft.com/ja-jp/office/dev/scripts/develop/scripting-fundamentals
859デフォルトの名無しさん (アウアウウー Sa21-7Ie9)
2022/01/31(月) 13:07:08.11ID:xK8RZLXxa >>855
銀河万丈の声で脳内再生されて草
銀河万丈の声で脳内再生されて草
860デフォルトの名無しさん (ラクッペペ MM3e-VTwM)
2022/02/01(火) 04:12:47.67ID:BAkheZAsM >>845
ありがとうございます。
ありがとうございます。
861デフォルトの名無しさん (ワッチョイ 6d36-T4N9)
2022/02/01(火) 18:51:32.45ID:BTrEast20 VBA 何もかもみな懐かしい。。
862デフォルトの名無しさん (ワッチョイ ea3e-81nj)
2022/02/01(火) 20:43:06.80ID:m1Otvt2w0 GoogleのI'm Feeling Luckyボタンを押すために
objIE.document.GetElementsByClassName("〜")(0).click
って書いてちゃんとclassnameの名前を入れているのに実行してみたら
438 オブジェクトは、このプロパティまたはメソッドをサポートしていません。
って表示されて実行されません
idだったらちゃんと動作するのですがclassnameだと実行されません
目的はclassnameでのボタンの押し方を知る事なのでどうしてらいいのか教えてください
objIE.document.GetElementsByClassName("〜")(0).click
って書いてちゃんとclassnameの名前を入れているのに実行してみたら
438 オブジェクトは、このプロパティまたはメソッドをサポートしていません。
って表示されて実行されません
idだったらちゃんと動作するのですがclassnameだと実行されません
目的はclassnameでのボタンの押し方を知る事なのでどうしてらいいのか教えてください
863デフォルトの名無しさん (オッペケ Srbd-Wizw)
2022/02/01(火) 21:42:08.98ID:JauLxykcr 独立したIf式が100個あるとして、どのIf式が処理をしたか最後にmsgboxで表示したいのですが、そういうことってできますか
864デフォルトの名無しさん (ワンミングク MM7a-DCUM)
2022/02/01(火) 21:53:36.89ID:NaaBd1FpM できる
はい、次
はい、次
865デフォルトの名無しさん (ワッチョイ 6a42-6J+F)
2022/02/01(火) 21:53:41.40ID:UmaqdsBP0 各ifの処理の中でmsgboxに表示する番号なり何なりを変数に代入すればいいんじゃね
866デフォルトの名無しさん (オッペケ Srbd-Wizw)
2022/02/01(火) 23:48:27.08ID:JauLxykcr867デフォルトの名無しさん (スフッ Sd0a-IClH)
2022/02/01(火) 23:53:02.19ID:mToNlmlwd マクロでマクロを書く
はい次
はい次
868デフォルトの名無しさん (ワッチョイ 6a42-6J+F)
2022/02/02(水) 00:04:57.15ID:XK9gt2og0 それはif文を理解していないという解釈でいいのか
870デフォルトの名無しさん (ワッチョイ 662c-Cnlt)
2022/02/02(水) 00:23:00.41ID:DCaD8SVN0 >>862
Document.getElementsByClassName()
https://developer.mozilla.org/ja/docs/Web/API/Document/getElementsByClassName
JavaScript なら、上のリンク先を見れば良いけど、
VBA では、書き方が異なるのかも
Document.getElementsByClassName()
https://developer.mozilla.org/ja/docs/Web/API/Document/getElementsByClassName
JavaScript なら、上のリンク先を見れば良いけど、
VBA では、書き方が異なるのかも
871デフォルトの名無しさん (ワッチョイ ea3e-81nj)
2022/02/02(水) 07:28:52.11ID:4nB6ciIN0 >>870
ここからボタンを押すにはなんと書けばいいのでしょうか、、、?
ここからボタンを押すにはなんと書けばいいのでしょうか、、、?
872デフォルトの名無しさん (スッップ Sd0a-dw97)
2022/02/02(水) 07:31:23.63ID:f98ebtked この手の質問は悪用される可能性があるから回答するの躊躇するよね
873デフォルトの名無しさん (ワッチョイ 662c-Cnlt)
2022/02/02(水) 07:47:54.37ID:DCaD8SVN0 Ruby で、Selenium WebDriver なら、
driver.要素.click だけど、VBA は知らない
検索してみれば?
driver.要素.click だけど、VBA は知らない
検索してみれば?
874デフォルトの名無しさん (スッップ Sd0a-7nMi)
2022/02/02(水) 07:49:20.30ID:Sif5VXmLd >>871
学習目的なら他のサイトにしたら
学習目的なら他のサイトにしたら
875デフォルトの名無しさん (オッペケ Srbd-4IfY)
2022/02/02(水) 10:07:41.90ID:wojfg/N6r こんなところにアホな質問するヤツらは
ググる能力さえ無いということなのか?
ググる能力さえ無いということなのか?
876デフォルトの名無しさん (スッップ Sd0a-dw97)
2022/02/02(水) 11:13:58.55ID:QFn3Myrbd ググったりして、その上で質問してると信じたい
スクレイピングとかブラウザの自動処理の質問だけど後者は悪用されるリスクが高いから答えたくないよね
スクレイピングとかブラウザの自動処理の質問だけど後者は悪用されるリスクが高いから答えたくないよね
877デフォルトの名無しさん (オッペケ Srbd-4IfY)
2022/02/02(水) 11:17:43.23ID:wojfg/N6r 違うよ
処理完了MsgBox を表示させるなんて
素人でもググって1分で作れるだろ
処理完了MsgBox を表示させるなんて
素人でもググって1分で作れるだろ
878デフォルトの名無しさん (ワッチョイ 5e68-Xc5L)
2022/02/02(水) 11:38:37.34ID:Ro/5oidY0879デフォルトの名無しさん (アウアウウー Sa21-1xoK)
2022/02/02(水) 11:54:30.15ID:34qMGLm0a >>878
なら答えてやれよw
なら答えてやれよw
880デフォルトの名無しさん (スッップ Sd0a-dw97)
2022/02/02(水) 12:16:51.15ID:QFn3Myrbd どんな言語もそうだけど敷居なんて高いと思ったことないよ
そもそもできないこともわからずにあれこれやろうとしてる人がそう思うだけでは
そもそもできないこともわからずにあれこれやろうとしてる人がそう思うだけでは
881デフォルトの名無しさん (ラクッペペ MM3e-KfKj)
2022/02/02(水) 12:26:36.37ID:h1+1MA/aM Excelを操作するための言語で
なぜブラウザを操作しているのか?
もっと良い方法があったのではないか?
手を動かす前にほんの少しは考えたほうが良かったのではないか?
なぜブラウザを操作しているのか?
もっと良い方法があったのではないか?
手を動かす前にほんの少しは考えたほうが良かったのではないか?
■ このスレッドは過去ログ倉庫に格納されています
ニュース
- 中国とロシアの爆撃機、日本周辺で共同飛行 [少考さん★]
- 「中国側も日本機のレーダーを感知していた」 中国メディアが報道 [♪♪♪★]
- 【YouTuber】バイク事故で入院のゆたぼん、振込で「お見舞金」募る [muffin★]
- 高市早苗首相、消費税減税に後ろ向き 足かせはレジシステム? 「責任ある積極財政」期待高いが [蚤の市★]
- 堀江貴文、キャッシュレス非対応の店にモヤッ 『PayPay』立ち上げの人物にまさかの直談判「現金決済しかできないんだけど…」 [冬月記者★]
- バリ島で男子生徒ら集団万引きか、防犯カメラ映像が拡散 京都の大谷中学・高校が「窃盗行為」謝罪★7 [七波羅探題★]
- 防衛省、中国を完全論破www 「事前通告があったのは海自であって空自ではない」 高市早苗勝利 [175344491]
- 買ったばかりのオーブンレンジ「この機種はお餅を焼くことはできません」
- 【悲報】JA「全然米が売れなくて倉庫を圧迫してる。助けて!」米卸売り業者「安売りしたら赤字になる…助けて!」 [802034645]
- 【悲惨】中国軍が自衛隊に「事前通告」し自衛隊も返答した音声が公開されてしまうwwwこれは高市チェックアウトゕ★4 [597533159]
- 腕時計が冷たあい!
- 無限大の世界の主 vs ヘリコプターのパイロット
