[表示 : 全て 最新50 1-99 101- 201- 301- 401- 501- 601- 701- 801- 901- 1001- 2ch.scのread.cgiへ]
Update time : 02/26 16:42 / Filesize : 257 KB / Number-of Response : 1014
[このスレッドの書き込みを削除する]
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

Excel VBA 質問スレ Part79



1 名前:デフォルトの名無しさん mailto:sage [2023/01/28(土) 11:46:47.21 ID:mBQ16TA8.net]
↑同じ内容を3行貼り付けること

ExcelのVBAに関する質問スレ
コード書き込みや作成依頼もOK

次スレは>>980が立てること
無理なら細かく安価指定

※前スレ
Excel VBA 質問スレ Part77
https://mevius.5ch.net/test/read.cgi/tech/1658009255/
Excel VBA 質問スレ Part78
https://mevius.5ch.net/test/read.cgi/tech/1667104996/

-
VIPQ2_EXTDAT: checked:vvvvv:1000:512:: EXT was configured

669 名前:デフォルトの名無しさん mailto:sage [2023/04/30(日) 08:37:28.66 ID:mp9OxrP6.net]
褒められたい
認められたい
尊敬されたい

何か間違ってますか?

670 名前:デフォルトの名無しさん [2023/04/30(日) 09:41:48.68 ID:n+FRgVAt.net]
>>658
確実にウザがられますから

671 名前:デフォルトの名無しさん mailto:sage [2023/04/30(日) 11:07:37.09 ID:vWJSQfSu.net]
たまたまマクロ使えただけとかいうクソがいてマジでイラつくわ

672 名前:デフォルトの名無しさん [2023/04/30(日) 11:38:27.17 ID:n+FRgVAt.net]
>>658
それはあなたがまだまだお若いからです

猛勉強をして医学部になり研修医になり医者になった人が、それからも成功したいと思い開業医になり、猛勉強をしながら人のために何をしたらいいのかと考え続けておられましたが、そうした生活の中で得られた結論は「他人を変えられない」でした

673 名前:デフォルトの名無しさん [2023/04/30(日) 12:01:39.99 ID:n+FRgVAt.net]
Bingのチャット面白いですね

674 名前:デフォルトの名無しさん mailto:sage [2023/04/30(日) 13:38:29.83 ID:pCoVes+C.net]
>>664
医者と関係なくない?
というかなぜ医者の話をしたの?

675 名前:デフォルトの名無しさん mailto:sage [2023/04/30(日) 14:58:48.37 ID:izKLiPLe.net]
'A列の重複文字を削除したいのですが.RemoveDuplicatesで型が一致しないとでます。
どうすればよいでしょうか。お願いします。

Sub RemoveDuplicatesExample()
Dim lastRow As Long
Dim rng As Range
Dim dupCount As Long
Dim cell As Range

' 最終行を取得する
lastRow = Cells(Rows.Count, "A").End(xlUp).Row

' A列の範囲を取得する
Set rng = Range("A6:A" & lastRow)

676 名前:デフォルトの名無しさん mailto:sage [2023/04/30(日) 14:59:03.71 ID:izKLiPLe.net]
' 文字列を含むセルを数字に変換する
For Each cell In rng
If IsNumeric(cell.Value) Then
cell.Value = Val(cell.Value)
End If
Next cell

' 重複を削除する
dupCount = rng.RemoveDuplicates(Columns:=1, Header:=xlNo)

' メッセージを表示する
MsgBox "重複を" & dupCount & "個削除しました"
End Sub

677 名前:デフォルトの名無しさん mailto:sage [2023/04/30(日) 16:08:17.99 ID:nWN6HH2r.net]
RemoveDuplicates はメソッド メソッドとはオブジェクトを操作する命令文
dupCount はCellの数を削除前と後でCount辺りで別途算出



678 名前:デフォルトの名無しさん mailto:sage [2023/04/30(日) 17:39:59.36 ID:xlDTnGib.net]
「ちょうふく 」と読む人と「じゅうふく」と読む人いるね

679 名前:デフォルトの名無しさん [2023/04/30(日) 17:43:09.61 ID:n+FRgVAt.net]
>>666
一生懸命勉強をして頑張っている人でも人を変えるのは無理だというのが結論なのにあなたにはそれが出来るのですか?

680 名前:デフォルトの名無しさん [2023/04/30(日) 17:58:36.35 ID:V4pO/PXO.net]
「じゅうふく」と読む人と「ちょうふく」と読む人いるね

681 名前:デフォルトの名無しさん mailto:sage [2023/04/30(日) 18:10:45.40 ID:SF8fLpoq.net]
すでに回答あるけどエラー表示通り、Long型の変数にRangeを入れようとしてるから

検証してないけど
rng.RemoveDuplicates Columns:=1, Header:=xlNo
で動くかな?カウントは処理前後で取得すればいいかと。

682 名前:デフォルトの名無しさん mailto:sage [2023/04/30(日) 21:51:10.68 ID:izKLiPLe.net]
>>669
>>673
出来ました。ありがとうございます。

683 名前:デフォルトの名無しさん mailto:sage [2023/04/30(日) 23:47:19.54 ID:xlDTnGib.net]
>>672
どちらが正解かな?

684 名前:デフォルトの名無しさん mailto:sage [2023/04/30(日) 23:54:50.78 ID:RAvx61h8.net]
ダブり

685 名前:デフォルトの名無しさん [2023/05/01(月) 08:25:17.17 ID:Bz4H7pRU.net]
>>675
どちらも正解だけど一般的にはちょうふく

686 名前:デフォルトの名無しさん mailto:sage [2023/05/02(火) 17:39:15.35 ID:s64+rcVS.net]
Option Explicit は使った方が良いですか?
Lastrowが多すぎて外していたんですけどやめた方がいいのかわからない。
直すのも面倒

687 名前:デフォルトの名無しさん mailto:sage [2023/05/02(火) 18:06:55.02 ID:rzS4cwhi.net]
>>678
苦行が好きならどうぞ外してくださいな。



688 名前:デフォルトの名無しさん [2023/05/02(火) 19:43:32.75 ID:5m1nmjju.net]
>>678
そんなことも人に聞かないとわからない人は外さない方がいい

689 名前:デフォルトの名無しさん mailto:sage [2023/05/02(火) 19:52:52.48 ID:+blsYFqi.net]
Option Explicitを使用することをお勧めします。Option Explicitは、VBAプログラム内で使用されるすべての変数を明示的に宣言することを強制するため、タイプミスやスペルミスなどのエラーを防止するのに役立ちます。

また、変数を宣言することによって、コードの読みやすさと保守性を向上させることができます。たとえば、変数のデータ型が分かっている場合、誤ったデータ型によるエラーを防止することができます。

つまり、Option Explicitを使用することは、より正確で安全なコードを作成するために重要です。したがって、可能な限りOption Explicitを使用することをお勧めします。

また、コードの修正が面倒である場合でも、過去のコードを修正することで、将来的に発生する可能性のあるエラーを防止することができます。

690 名前:デフォルトの名無しさん [2023/05/02(火) 19:56:11.18 ID:DG7CtCYh.net]
フィルターの項目事、あるいはセルの項目ごとにシートにコピーするかファイルに出力する方法はありますか?

691 名前:デフォルトの名無しさん mailto:sage [2023/05/02(火) 22:53:54.12 ID:W01QlVgz.net]
ありまぁす

692 名前:デフォルトの名無しさん mailto:sage [2023/05/03(水) 04:56:22.98 ID:KcOhtZMX.net]
過去スレにそんなもんは付けないよとかほざく猛者いたな。
理由は支離滅裂だったけど

693 名前:デフォルトの名無しさん [2023/05/03(水) 08:16:46.41 ID:zwp10Saa.net]
本当ならOption Explicitの他にOption Strictも欲しいくらい。
ただ、それに慣れるとVBSやJavaScriptみたいな言語に当たったときに一瞬躊躇するから
型に関してはそれが読み取れるような変数や定数の名前の付け方をするように心掛けてはいるけど中々難しいんだよね
接頭に型を現すような文字付けるのも有りっちゃ有りなんだけどなんか「あー、初心者がよくやるよね」みたいな感じがしてちょっとイヤ

694 名前:デフォルトの名無しさん mailto:sage [2023/05/03(水) 08:38:47.67 ID:07Dbowlh.net]
jsはletあるやん

695 名前:デフォルトの名無しさん [2023/05/03(水) 17:42:16.15 ID:6h8oPcDB.net]
BingのAIと会話してみた感想
サイトの記述を引用しているだけだから自然な文章なのは当然
回答パターンがまだまだ少ない
いいねボタンとバットボタンがある
いいねの多い回答だけ残す、バットの多い回答は表示させない
↑であれば当たり感触のない回答しか学習しない、人間の知能を越える事はない
そしてそのやり方は前からあったシミレーションのプログラムと同じ

696 名前:デフォルトの名無しさん mailto:sage [2023/05/03(水) 17:46:59.65 ID:8i/q/Kgr.net]
何そのツッコミ待ち

697 名前:デフォルトの名無しさん mailto:sage [2023/05/03(水) 19:15:10.32 ID:KcOhtZMX.net]
BingのAIはすぐ拗ねちゃうからな



698 名前:デフォルトの名無しさん [2023/05/03(水) 19:36:47.70 ID:6h8oPcDB.net]
ChatGPT 3.5は出鱈目な回答をしていた 4.0になって当たりざわりのない回答になった
そういう事でしょう?

699 名前:デフォルトの名無しさん mailto:sage [2023/05/03(水) 19:40:16.52 ID:Kv12u2jn.net]
お前がそう思うんならそうなんだろう…お前ん中ではな…

700 名前:デフォルトの名無しさん mailto:sage [2023/05/03(水) 19:41:04.17 ID:Ia3mFb59.net]
有用性とか将来性が分からなければそれでいいんじゃね
勝手に遠ざけてどんどん取り残されればいいさ

701 名前:デフォルトの名無しさん mailto:sage [2023/05/03(水) 20:14:55.06 ID:F2sofNfH.net]
Lastrowってどんな感じで変化させてる?
シート数多すぎて混乱する

702 名前:デフォルトの名無しさん [2023/05/03(水) 21:36:02.93 ID:6h8oPcDB.net]
野獣先輩 と聞けば回答を途中で打ち切る
しかし 中国 野獣先輩 と尋ねると中国での野獣先輩ブームをスラスラ答える

703 名前:デフォルトの名無しさん [2023/05/03(水) 21:51:50.56 ID:6h8oPcDB.net]
やーい AIの癖に掛け算も割り算もできない奴〜

704 名前:デフォルトの名無しさん mailto:sage [2023/05/03(水) 23:21:43.78 ID:nQu3mtYe.net]
Bingさんは普通に計算できるが?

705 名前:デフォルトの名無しさん mailto:sage [2023/05/04(木) 17:35:46.71 ID:SG8oVDU2.net]
複雑なのはダメ。

706 名前:デフォルトの名無しさん [2023/05/04(木) 19:50:34.95 ID:Sg4+jaA6.net]
AIの回答には引用元のリンクがあるので著作権問題に繋がるのもよく分かる

707 名前:デフォルトの名無しさん mailto:sage [2023/05/05(金) 06:38:40.34 ID:P+m46K4i.net]
>>693
クラスモジュールの出番だな



708 名前:デフォルトの名無しさん [2023/05/06(土) 10:27:00.05 ID:fVwKK7Qd.net]
仮にここから5.6.7とバージョンを重ねてデータベースが増えたと言ってもそれはますます膨大な情報量によって平均への回帰とかよくあるご意見になるだけだと思う
膨大なデータベースがあるからとほぼ全ての人間が間違っていると考える答えを導き出しますか?
そうでなくてもデータベースにない(人間の盲点)情報は出鱈目な回答を生成しますよ

現状は人間が検索していくつものサイトを見て得た情報を代わりに要約してくれる(しかもその要約も正しいか不明、正しいとしても他に見るべき情報は本当にないのか?)程度の品物だと思う
つまり検索エンジン

709 名前:デフォルトの名無しさん [2023/05/06(土) 10:47:11.02 ID:fVwKK7Qd.net]
人型ロボットの進化も著しいものがあります
しかし直ぐに壊れる、壊れやすいと言う欠点(これは私も盲点だった)が露呈した
「人型ロボットはここまで進化した(している)」という短い動画を見て凄い、凄いと言っていただけでその裏側を見ていなかった
ごく一部の切り取りだった

710 名前:デフォルトの名無しさん mailto:sage [2023/05/06(土) 12:49:51.00 ID:DOnaG3pX.net]
独り言とかどうでもいい

711 名前:デフォルトの名無しさん [2023/05/06(土) 13:01:03.66 ID:fVwKK7Qd.net]
>>702
あれだけAIが凄いと言っていた人が多いのに?

712 名前:デフォルトの名無しさん mailto:sage [2023/05/06(土) 15:26:46.40 ID:V/5WCcXW.net]
多いんじゃ無くて、特定の少数がやかましいだけ
新しい技術はまずは様子見するのがベテランだろ 触ってみて将来性を鑑みて安定しそうならダッシュで技術を取り込む
今のところずば抜けた検索エンジン程度なら、のんびりザッピングしてじぶんが認める結果を取り込んでた方がマシ
急がば回れ 慌てるコ〇キは貰いが少ない 善は急げで道端の石に蹴躓いてたんじゃ元も子もない

713 名前:デフォルトの名無しさん mailto:sage [2023/05/06(土) 17:05:38.77 ID:uYMm8A/b.net]
様子見するのはベテランじゃない
レイトマジョリティ、あるいはラガードな

714 名前:デフォルトの名無しさん mailto:sage [2023/05/06(土) 17:25:28.28 ID:l5Xh2UOq.net]
これはvbsスレの気持ち悪いのがこっちに移住してきたと考えるのが自然か

715 名前:デフォルトの名無しさん mailto:sage [2023/05/06(土) 17:25:52.89 ID:V/5WCcXW.net]
おお、かっちょいい呼び方 ま、覚えてられないと思うけど
散々鳴り物入りでお披露目されて大勢が一斉に傾いた技術でも、スタンダードに成れなかったのはいくらでもあるし
HTML5 PHP 業界の擦り合わせで潰しに掛かるまであるし 何度も踊らされた経験持つ人ほど出足は鈍い(の意味てことで)
それに比べたらOfficeのVBAなんて、使い込まれてレガシーだけど生き続けてて実績たっぷりだしそれなり充実してて イイネw

716 名前:デフォルトの名無しさん [2023/05/06(土) 19:06:41.82 ID:fVwKK7Qd.net]
初めての試み
他の人がやっていない事
他と違う事
は往々にして頭がおかしいと言われます
AIがこれらの回答を生成してもそれは同じ

717 名前:デフォルトの名無しさん mailto:sage [2023/05/07(日) 01:23:52.56 ID:31z9TTNB.net]
なんだかこのスレも気持ち悪くなったな。



718 名前:デフォルトの名無しさん [2023/05/07(日) 01:49:32.50 ID:oPHUqsU3.net]
最初からだぞ

719 名前:デフォルトの名無しさん mailto:sage [2023/05/07(日) 04:38:26.84 ID:31z9TTNB.net]
例の精神病んでる人が最近しつこいしな。

720 名前:デフォルトの名無しさん [2023/05/07(日) 05:20:09.87 ID:tNDxK8R1.net]
AIに狩野英孝って書いて画像生成させてみ?
女性しか生成されないぞ?

721 名前:デフォルトの名無しさん mailto:sage [2023/05/08(月) 17:42:02.89 ID:4wzuVWZF.net]
5:20に何を言ってるんだ?

722 名前:デフォルトの名無しさん [2023/05/08(月) 20:14:43.36 ID:sHCjNd7k.net]
肖像権の侵害

723 名前:デフォルトの名無しさん mailto:sage [2023/05/08(月) 21:20:01.63 ID:mh5d7unG.net]
>>693
シート数それぞれの最終行を変数に入れたいなら配列かDictionaryでいいんじゃね?

724 名前:デフォルトの名無しさん [2023/05/10(水) 00:19:20.08 ID:ispoDagW.net]
そうね
エンティティクラス作ってシート名と最終行をプロパティに持たせる方法と
ディクショナリーかコレクションを使ってシート名をキーに、最終行を値に持つ方法と
2次元配列持って要素にシート名と最終行を持たせて管理する方法を思いついたけど、
最終行以外の何かしらのシート情報を持たせるならクラスを、
そうでなければそれ以外の方法を使う感じになると思うのだけれど、
実際、配列をループして取り出すのとディクショナリーやコレクションにキーを指定して取り出すのはどっちが速いんかね?

個人的にはあまり配列からループして取り出すのはコード書くのが面倒なのと記述がその分長くなるのとObjectとして扱えないから好きではないんだけど。

725 名前:デフォルトの名無しさん mailto:sage [2023/05/10(水) 12:35:00.38 ID:kLH3jMBB.net]
揮発性メモリなら生成コストも比較してる?

726 名前:デフォルトの名無しさん mailto:sage [2023/05/10(水) 14:00:21.35 ID:t+3iUujv.net]
test

727 名前:デフォルトの名無しさん mailto:sage [2023/05/10(水) 14:06:43.49 ID:t+3iUujv.net]
トグルA、Bがあって、
①(初期状態)AがOFF BがOFF
②AをON
③BをON
の順に操作した場合、
まず②で、トグルA_Click()イベントのみ発生
③では、トグルB_Click()イベントだけでなくトグルA_Click()イベントも発生するんだけど、
前からそういう挙動でしたっけ?



728 名前:デフォルトの名無しさん mailto:sage [2023/05/10(水) 15:00:24.82 ID:t+3iUujv.net]
>>719は無視してください。

729 名前:デフォルトの名無しさん mailto:sage [2023/05/10(水) 15:13:48.51 ID:t+3iUujv.net]
トグルA_Click()のイベントプロシージャの中に、
トグルBのValueをFalseにする処理を入れています。(>>719はこのことを失念していました)

トグルBがONになっている

730 名前:態でトグルAをクリックしてOFF→ONにするとトグルBがOFFになります。
この時、トグルB_Change()イベントが発生するのは分かるのですが、トグルB_Click()イベントも発生します。
これは仕様ですか?
[]
[ここ壊れてます]

731 名前:デフォルトの名無しさん mailto:sage [2023/05/10(水) 17:55:26.74 ID:iwbfLeO4.net]
仕様です

732 名前:デフォルトの名無しさん mailto:sage [2023/05/10(水) 19:03:43.77 ID:+eiaChgK.net]
ならしようがないね

733 名前:デフォルトの名無しさん mailto:sage [2023/05/10(水) 21:12:59.13 ID:o4erV5Yp.net]
スレチっぽいですが、わかる方いましたら回答をお願いします。
VBAとSeleniumを使用してスクレイピングをしたいのですが
1枚の画像を取得するだけでもメモリ不足と出ます。

ChatGPTに聞いたら

734 名前:デフォルトの名無しさん mailto:sage [2023/05/10(水) 21:13:48.62 ID:o4erV5Yp.net]
Seleniumは外部のWebブラウザを制御するため、メモリ使用量が増加する可能性があります。

と返答がきましたが、VBAでは重くなるのでしょうか?

735 名前:デフォルトの名無しさん mailto:sage [2023/05/10(水) 21:15:41.06 ID:mDjUk4R1.net]
>>724
プログラムが間違ってる可能性のが高い

736 名前:デフォルトの名無しさん mailto:sage [2023/05/10(水) 23:57:34.43 ID:o4erV5Yp.net]
>>726
ありがとうございます。
何か負荷がかかることをしているのかもしれませんね
もう一度見直してみます。

737 名前:デフォルトの名無しさん mailto:sage [2023/05/11(木) 11:43:08.05 ID:1+aaeJbv.net]
そのChatGPTとやらが回答するシチュエーションの、一文字ずつ表示する方法を知りたい とか、もっと前向きに
単にmsgbox出すよりは注目されそうだし(そのうち飽きられるだろうけど)



738 名前:デフォルトの名無しさん mailto:sage [2023/05/11(木) 11:51:22.37 ID:AMweY8Mr.net]
wsCopyTo.Cells(wsCopyTo.Cells.Rows.Count, "A").End(xlUp).Offset(1).Value = today
wsCopyTo.Cells(wsCopyTo.Cells.Rows.Count, "A").End(xlUp).Offset(1).NumberFormat = "mm/dd""(""ddd"")"

日付の書式設定を変えたいのですが
「range クラスの numberformat プロパティを設定できません」と出ます。
どうすればよいでしょうか

739 名前:デフォルトの名無しさん mailto:sage [2023/05/11(木) 11:58:50.33 ID:6FktRVdV.net]
>>729
"mm/dd""(""ddd"")"""

740 名前:デフォルトの名無しさん mailto:sage [2023/05/11(木) 12:26:29.64 ID:AMweY8Mr.net]
>>730
エラーは出なくなりましたが表示形式は変わりません。
これは"を一つ追加したようですがどういった意味があるのでしょう

741 名前:デフォルトの名無しさん mailto:sage [2023/05/11(木) 13:08:23.72 ID:6FktRVdV.net]
>>731
前略Offset(1).Value = Now

742 名前:デフォルトの名無しさん [2023/05/12(金) 06:37:47.52 ID:RwI7vd5H.net]
仕事でVBAマクロを使用しておりそのマクロではapplication ontime? を使用しエクセルが開かれてから一定時間過ぎたら閉じますか?とメッセージを出す処理をしています
仮にこのブックをブックAとします
ブックAを開いた状態でそのブックとは別のブックを開きます
このブックをブックBとします。
ブックAとブックBを同時に開いた状態でブックAだけを閉じても何故か一定時間経過後ブックAが自動で開きブックを閉じますか?とメッセージがでます。
ブックBのソースコード見てもマクロは組まれておらず何で?と困ってます

一応ブックAの処理に特定のファイル名の時だけメッセージが出るようにしたのですがその処理も勝手にブックAが開いてから流れるため困ってます

わかりにくくてすみませんがアドバイスよろしくお願いします。

743 名前:デフォルトの名無しさん [2023/05/12(金) 07:53:35.95 ID:hB6iHQ/6.net]
興味深い現象だな

744 名前:デフォルトの名無しさん mailto:sage [2023/05/12(金) 08:45:29.16 ID:273OhBWp.net]
>>733
OnTimeの処理はExcel本体とは別のプロセスが引き受ける仕組みになってる
ブックを同時に開かないよう気をつけるのが一番簡単
勝手に直していいんなら開いてるブックを判定するコードとかブックを閉じる時にタイマーを止める処理を書き足す

任意のタイマーを止める方法は、ちょっとぐぐったことあるけど、設定された時刻が判明しない限り簡単じゃない
この点はみんな苦労してる

745 名前:デフォルトの名無しさん mailto:sage [2023/05/12(金) 11:06:37.75 ID:7uGQBCYW.net]
その、閉じますかマクロは必須、必要な処理なのか?意図がわからない
むかしのメモリ使用量節約とかで組んでたとか?複数ファイル開くとフリーズとか防止用?

746 名前:デフォルトの名無しさん mailto:sage [2023/05/12(金) 11:59:40.51 ID:/sP06OC3.net]
職場で使っているマクロは現在の担当者が正しく動作するように管理する責任があると思うので
自分が作ってないからどう動くかわからないとしても責任を逃れることはできない

747 名前:デフォルトの名無しさん [2023/05/12(金) 17:51:08.96 ID:xsCXSmel.net]
ADODB.recordsetで名前に角カッコ([←これ)がついたcsvファイルを扱いたいんですが、何か方法ありますか?



748 名前:デフォルトの名無しさん mailto:sage [2023/05/12(金) 18:03:43.71 ID:273OhBWp.net]
ある

749 名前:デフォルトの名無しさん [2023/05/12(金) 20:13:32.86 ID:f5ZiP8iw.net]
一つお尋ねしたいのですが
シートをコピーした後にコピ元のシートと一番新しいシートで変更のあった、更新のあったセルに色を塗りつぶすVBAは組めるでしょうか?
わたしは「一番新しいシート」と元シートの比較をすると言うのが非常に複雑なコードになりそうな気がするので
コピーしたシートで一番新しいシートの名前は固定のものに変更する
またはセルの比較と塗りつぶし作業後にシート名を変更するコードを書こうかなと思っています

750 名前:デフォルトの名無しさん [2023/05/12(金) 20:38:30.74 ID:8W63Tv/2.net]
組める
お前の頭が追いついていないだけ

751 名前:デフォルトの名無しさん [2023/05/12(金) 21:51:44.25 ID:f5ZiP8iw.net]
https://daitaideit.com/vba-compare-two-sheets/

このコードを応用すればできそうな気がしてきました

752 名前:デフォルトの名無しさん [2023/05/13(土) 00:26:35.42 ID:XDOekk9R.net]
シート1をシート2に転記
シート2にはシート1との比較の関数を仕込む
シート2を末尾にコピー

最終的にこうしました

753 名前:デフォルトの名無しさん mailto:sage [2023/05/13(土) 08:56:53.55 ID:IDKvuPgu.net]
たまにしか使わないマクロを
「開発」 → 「マクロ」をクリックした画面から非表示にする方法はありますか
たくさんプロシージャがあって探すのがわかりづらいので。

754 名前:デフォルトの名無しさん [2023/05/13(土) 10:14:45.62 ID:qLGZy+iI.net]
たまにしか使わないのとよく使うマクロを区別する方法がない

755 名前:デフォルトの名無しさん mailto:sage [2023/05/13(土) 11:55:35.18 ID:/fPWBZJh.net]
PERSONAL.XLSB内の個人マクロかなんかのこと?
使わないのはprivateにでもしたらいい

756 名前:デフォルトの名無しさん [2023/05/13(土) 14:12:54.71 ID:GFR2hXVT.net]
てすと

757 名前:デフォルトの名無しさん mailto:sage [2023/05/13(土) 17:08:43.77 ID:V8yG/UHy.net]
>>744
モードレスのユーザーフォームにボタン並べてショートカットツールボックスでも作れば。。。



758 名前:デフォルトの名無しさん mailto:sage [2023/05/13(土) 23:12:26.90 ID:25Zi9cll.net]
UserFormにボタンを追加した後、ボタンをダブルクリックすると、
コード内にボタン_Click()が挿入されるけど、
そのボタン_Click()の挿入位置はランダムですか?

759 名前:デフォルトの名無しさん mailto:sage [2023/05/13(土) 23:22:19.81 ID:HLBQiI9F.net]
一番上固定かな?

760 名前:デフォルトの名無しさん mailto:sage [2023/05/14(日) 00:50:10.90 ID:T/aUw/Co.net]
一番上とか一番下なら分かりやすいんですが、そうならないんですよね。
追加した順でも、VBE上の直前のカーソル位置でもなく。

761 名前:デフォルトの名無しさん [2023/05/14(日) 08:49:07.12 ID:NGLUYN6O.net]
  With
    Worksheets(1)
    Debug.Print .Name
    Worksheets.Add Before:=Worksheets(1)
    Debug.Print .Name
  End With

と入力している場合、当然ワークシート(1)に対してしかwithで省略して記述することはできませんよね?

762 名前:デフォルトの名無しさん mailto:sage [2023/05/14(日) 09:12:17.84 ID:l3SxB+lY.net]
それ以外にも記述できたらどれに記述してるかわからなくなりますやん

763 名前:デフォルトの名無しさん [2023/05/14(日) 11:24:04.23 ID:RX81XCn0.net]
IF分の中に何個もIFをつけると嫌がられますが上級者の方達は条件分岐どのように処理をさせていますか?
綺麗なコードの書き方のアドバイスお願いしたいです

764 名前:デフォルトの名無しさん mailto:sage [2023/05/14(日) 11:56:15.05 ID:/qnsVbR/.net]
>>754
長くなる数式や複雑な条件判定は別の関数を作ってその中にまとめる

765 名前:デフォルトの名無しさん [2023/05/14(日) 14:28:00.07 ID:NGLUYN6O.net]
オートフィルターを設定
セルの値でフィルター
別シートにコピー
.copy(名前をつけて保存)

までVBAで組めました
セルの値を別シートが別の列に用意したリストで繰り返しをして名前をつけて保存を繰り返すVBAが組みたいのですがどうすればいいでしょうか?

ちなみにオートフィルターを設定して、セルの値でフィルターをかけるコードを書かなくても
オートフィルターをかけた表で作成して
手動でフィルターをかけた結果
に対してコピーと名前をつけて保存を行うコードを作ればよかったと思いました

766 名前:デフォルトの名無しさん mailto:sage [2023/05/14(日) 17:40:28.14 ID:RbSCBcNR.net]
VBScriptの公式ドキュメントどこに行ったんですか!?!?

767 名前:デフォルトの名無しさん [2023/05/14(日) 23:25:20.98 ID:ugePsCnu.net]
>>757
それがこのスレと何か関係あるのか?



768 名前:デフォルトの名無しさん mailto:sage [2023/05/15(月) 01:52:14.73 ID:qI8Xfg30.net]
うるせえ!

769 名前:デフォルトの名無しさん [2023/05/15(月) 20:37:17.97 ID:XzAuzUrA.net]
sheet(2),range.value = sheet(1),range,value
と書いてあって、ちゃんと1と2のsheetがあるのに
インデックスの範囲外
のエラーが出る事はありますか?






[ 続きを読む ] / [ 携帯版 ]

前100 次100 最新50 [ このスレをブックマーク! 携帯に送る ] 2chのread.cgiへ
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧]( ´∀`)<257KB

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef