Excel VBA 質問スレ Part81

**デフォルトの名無しさん** · 2024/04/18(木) 14:03:38.03

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

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

関連スレ
Excel VBA 質問スレ Part79(ﾜｯﾁｮｲあり)
https://mevius.5ch.net/test/read.cgi/tech/1674875532/

※前スレ
Excel VBA 質問スレ Part79
https://mevius.5ch.net/test/read.cgi/tech/1674874007/
Excel VBA 質問スレ Part80
https://mevius.5ch.net/test/read.cgi/tech/1685489018/

**デフォルトの名無しさん** · 2024/11/17(日) 16:53:46.37

馬鹿にはそう思えるのか
というか、そういう馬鹿は元からいらない

**デフォルトの名無しさん** · 2024/11/17(日) 18:57:07.37

>>780
一部ではそうかもしれんが自分の職場はそうなってないのが現実

**デフォルトの名無しさん** · 2024/11/17(日) 19:03:46.98

>>780
そういう仕事はもう派遣さんか新卒教育用だよ殆ど
総合職でそんな仕事してるやつなんてたらい回しにされてる無能おっさんぐらいのもんよ

**デフォルトの名無しさん** · 2024/11/17(日) 19:25:08.33

既にAIは画像系、コピペ系を除き用途は限定的という評価が固まりつつある

現時点はこんな感じ

ステマ要員「これからはAIの時代だっ」
境界知能「AIすげー」
馬鹿「AIすげー」
プログラマーではなくコーダーレベルの開発者「AIすげー」

**デフォルトの名無しさん** · 2024/11/18(月) 00:23:27.45

生成AIにVBAを書かせれば大多数のVBAerを遥かに上回る非常に高品質な成果物が一瞬でできるのは事実なのだけど、
Excelに依存している職場にそれを自分でやれるだけのリテラシーのある人間がどれだけいるかって話
それができるレベルの人間がいるならそもそもVBAの出番すらなく、とっくにシステム化されてるだろうね

**デフォルトの名無しさん** · 2024/11/18(月) 19:21:42.92

AIも時々怪しいコード書くけどね。

**デフォルトの名無しさん** · 2024/11/18(月) 20:57:37.80

そんなこともわからん人なんだろ

**デフォルトの名無しさん** · 2024/11/19(火) 10:28:17.81

ここでは基準がVBAだから、一般的なプログラマAI代替議論とは一緒にすべきではない
現在のAIは少なくとも自称VBAできます事務員よりは遥かに有能であり、そのレベルでは議論の余地はない

**デフォルトの名無しさん** · 2024/11/19(火) 13:04:10.29

それに依存してしまってはヒトの発想力・想像力・構成力とかがどんどん失われて行ってしまい、ばかを量産することに繋がる
あ゛の゛ね゛ー、ぼ゛く゛ね゛ー　わ゛か゛ん゛な゛い゛　だらけで仕事が回らなくなる
脳を回転してこそヒト
ps://diamond.jp/articles/-/290378　手書きすることの有用性を見直しすべきまである

**デフォルトの名無しさん** · 2024/11/19(火) 17:30:42.53

>>789
じゃあこんなとこに書かずにチラシの裏に鉛筆書きでもしてろよ

**デフォルトの名無しさん** · 2024/11/19(火) 21:29:39.65

♪だいやもんどだねー

**デフォルトの名無しさん** · 2024/11/19(火) 21:40:16.75

いまの職場はVBEのことをVBAエディタと呼んだりしている。
変な言い回しだけど直感的にはわかるから、まあいいんじゃないかと思っている。

**デフォルトの名無しさん** · 2024/11/19(火) 22:23:27.38

VirtualBoxをVBと呼ぶ弊社と比べたら全然いい

**デフォルトの名無しさん** · 2024/11/19(火) 23:48:15.33

VBAの扱いなんかそんな程度なんだろ大半の職場は。

**デフォルトの名無しさん** · 2024/11/20(水) 09:26:58.29

>>792
vbeってなんの略？

**デフォルトの名無しさん** · 2024/11/20(水) 09:43:08.73

ExcelでVBAを使うのには二面あって、エンドユーザーが毎回使うのに都合がいい使い方と
制作者が業務を依頼されたときに都合がいい使い方
というのを、こないだ知人から相談されたときに実感した
「これVBA使って楽に作れるよな？」「作れるけど実務では要求されてないだろ？」「おれが楽に成るんだ」
いっぱい楽していっぱいお稼ぎください

**デフォルトの名無しさん** · 2024/11/20(水) 10:19:29.15

せいかい VBエディタ
まちがい VBAエディタ
http://imgur.com/sZ78EXy.png

**デフォルトの名無しさん** · 2024/11/20(水) 12:50:14.94

>>795
大半のアプリケーションはヘルプメニューに自分自身の製品名やバージョンなどの情報を載せているんだが？

普段、何を見ているのか？

**デフォルトの名無しさん** · 2024/11/20(水) 12:58:06.11

>>795
Visual BasicそのものがExcel用に作られたものではない。

VBAはVisual Basic for Applicationであり、Visual BasicをExcel用に変えたもの。

元がVisual Basicだから、Visual Basicのコードのエディタは略してVBEとマイクロソフトが定義した。

ちゃんとライセンスがあるなら、お金を払って日本マイクロソフトに問い合わせて聞けばいい。

3万円以上かかるけど。

**デフォルトの名無しさん** · 2024/11/20(水) 16:38:51.38

　Excel でカスタム関数を作成する・　マクロまたは VBA コードが検出されました・
　Visual Basic Editor の使用に関するヘルプを見つける・　マクロ記録で作業を自動化する・
　マクロモジュールを別のブックにコピーする・　単一のブックにすべてのマクロを作成して保存する・
　クイックスタート: マクロを作成する・　マクロを編集する・　ボタンにマクロを割り当てる・　マクロを実行する
Excelのヘルプで『VBE』と検索しても上記ぐらいしか列記されない
最近のExcel初心者にヘルプ使えっつっても、当のヘルプがほとんど使い物に成らない始末
ネットでググったほうが百倍有効な情報が出て来る　同じぐらいムダな情報も出て来るけど
だから先人の知恵をお借りしようかと、掲示板とかを利用する
ひと頃と違ってきているから、無暗矢鱈と罵るだけでは後進が育たない　単なるハラスメントでしかない

**デフォルトの名無しさん** · 2024/11/20(水) 18:16:15.74

>>800
ヘルプそのものじゃなくヘルプメニューにあるバージョン情報なんかの話でしょ
理解できないなら口挟まなくて良いよ

**デフォルトの名無しさん** · 2024/11/20(水) 19:23:47.00

スキャナー読み込みしたPDFから特定の文字を読み取りたいのですが何か良い方法はありますでしょうか
EXCEL　VBAだと調べた限り方法はなさそうですが、所詮素人調べなので…

**デフォルトの名無しさん** · 2024/11/20(水) 19:51:07.07

チューリング完全だからできなくはないけど不向きもいいところでは

**デフォルトの名無しさん** · 2024/11/20(水) 21:47:46.58

そんなもん画像にしてChatGPTに投げりゃ一発でしょ
自動でやらせたいなら画像と指示をそのまんまOpenAIのAPIに投げれば同様の結果が得られる
VBAに向いているかと言えば全力でNoだが、幸いVBAからOpenAI使ってる基地外はそれなりにいるから情報多いし、
真面目にOCRライブラリだの何だのと色々インテグレーションするより遥かに簡単、かつその割に高精度だ

**デフォルトの名無しさん** · 2024/11/20(水) 22:14:43.96

回答ありがとうございます
可能ではあるのですね
今はチャットだけでなくAPIまであるのですね…
それが一番優しそうなので、調べてみます
ありがとうございました

**デフォルトの名無しさん** · 2024/11/21(木) 08:19:00.66

ヘルプでバージョン調べて、それが何だってんだ
そもそも、バージョン調べるなら、ファイルのアカウントだろうに　何をイキってんだか

**デフォルトの名無しさん** · 2024/11/21(木) 08:47:19.49

>>806
イキってるのは自分でしょ
VBEって何だ？って話からの話題なのに、
ファイルメニューのアカウント見たって載ってるわきゃない
Excelのバージョン調べたいわけじゃないんだから
ちなみにVBEのバージョン情報見たってVBAが何の略か分かるだけだから、
上で普段、何を見ているのか？って言ってる奴自身が見てないってオチね

**デフォルトの名無しさん** · 2024/11/21(木) 13:44:11.90

知ったかぶりの集まりは相変わらずw

**デフォルトの名無しさん** · 2024/11/23(土) 17:25:59.94

弥生会計にCSV形式に変換したExcelファイルを取り込んでるんだけど、勘定科目の部門や補助科目も自動で入れる方法ない？

vlookupみたいにある程度上限作って絞り込むしかないんかな？

**デフォルトの名無しさん** · 2024/11/23(土) 19:31:25.56

下のエクセルファイルを加工すれば良いんじゃないの
弥生会計はどんな仕組みなの

**デフォルトの名無しさん** · 2024/11/23(土) 19:45:11.34

>>809
それはExcelの話ではなく、弥生会計の話だろ？

**デフォルトの名無しさん** · 2024/11/23(土) 19:45:47.64

>>809
CSVファイルはExcel形式のファイルではありません

**デフォルトの名無しさん** · 2024/11/23(土) 20:35:55.83

.csvをExcelに関連付けするMSが諸悪の根源

**デフォルトの名無しさん** · 2024/11/23(土) 20:38:41.63

まあエクセルで開くことのが多いから関連付けてくれてるほうが楽ではあるが

**デフォルトの名無しさん** · 2024/11/23(土) 21:05:41.16

>>810>>811
弥生会計側の設定じゃないのよ
勘定科目、補助科目、部門の順にセル毎に並んでるんだけど、Excelファイルを送ってくる人達が会計ソフト詳しくなくて、補助科目と部門はそもそもExcelファイルに入力する欄がない
そのファイルをCSVに変換して、弥生会計に取り込む前に俺が補助科目と部門を手入力してから取り込んでる
上手いことマクロ組んで勘定科目と適用欄の文字列で条件指定して補助科目入れたいんだが難しいかなあ

例えば勘定科目・車両費
　　　補助科目・駐車場代・ガソリン代・通行料
みたいな分かれ方してるときに、適用欄に〇〇駐車場代って書いてたら補助科目に駐車場代って入るようにしたいんだが、勘定科目ごとに補助科目と部門山ほどあるし無謀か？

**デフォルトの名無しさん** · 2024/11/23(土) 21:14:04.68

送られてくるエクセルの値から補助科目と部門を導ける法則性があるなら可能だけど

**デフォルトの名無しさん** · 2024/11/23(土) 21:22:18.33

>>815
結局、弥生会計の仕様に合わせたいと自分で説明しているけど？

まずはExcelファイルのフォーマットに項目を追加して、それを使わせるのが業務の変更方法だ。

自分でやろうとしても損をするだけ。

**デフォルトの名無しさん** · 2024/11/23(土) 22:01:59.28

>>816>>817
法則性ないんだよなあ…
やっぱExcel側を触るしかないのか
言ってしまうと各支店の小口現金のExcelファイルなんだが、そもそも小口現金って仕組みを廃止する方向のほうが早そうだな

**デフォルトの名無しさん** · 2024/11/23(土) 22:20:50.58

適当に入力していても、勝手に直してくれるから大丈夫だと思われているかもな。

**デフォルトの名無しさん** · 2024/11/23(土) 23:48:31.47

経理の事はよく分からんが、法則性のないものを手続き型プログラミングでどうにかするのは難しいよ。
その適用欄は備考欄みたいな自然言語の記入だよね？　限られたよくあるパターンだけ正規表現とかで拾うだけならできるだろうけど。
でも今ならAIのAPIを使えばなんとかなるかも？

**デフォルトの名無しさん** · 2024/11/24(日) 00:03:40.99

書き忘れたけどAIのAPI使う時は会社で機密保持契約とかしたものだけ使ってね。
一般の無料AIとか、有料だけど単なる従量制のやつは情報漏洩扱いになる可能性あるから注意ね

**デフォルトの名無しさん** · 2024/11/24(日) 00:55:47.56

>>821
ありがとうございます
確かにそうですね‥APIは控えておこうと思います

**デフォルトの名無しさん** · 2024/11/24(日) 01:20:37.42

自作自演なのか？
Excel VBAもわからない人間が生成AIを使えるわけがない

**デフォルトの名無しさん** · 2024/11/24(日) 07:59:53.28

恐怖のSEX上納システムってVBAで作れますか？

**デフォルトの名無しさん** · 2024/11/24(日) 09:23:40.67

>>819
まさにそう
分からない箇所は勘定科目すら空白でこっちで直してる
>>820
備考欄って書いたほうがよかったね
〇〇さん　〇〇町　タイムズ駐車場代
みたいに手入力で書いてくれてるから、支店ごとに入力内容違うし表記揺れも多い

**デフォルトの名無しさん** · 2024/11/24(日) 13:15:46.77

事務屋とシステム屋の溝は深いなと、毎度絶望的な気持ちになるよ

**デフォルトの名無しさん** · 2024/11/24(日) 13:30:20.42

本支店間でのデータのやり取りは、やよいの製品サポートサイトで『分散入力について』を参照
そのお作法に則って無くて、自前の入力フォームとかをExcel辺りで作って勝手にCSVでのやりとりをしてるなら、
会計ソフト側で受け入れられるレコードの仕様をキチンと把握しておかないと
勘定科目・補助科目・備考or摘要とかがすんなり難なく受け取れるなら、支店側でテキトーな文言記入してても
問題無く受け入れられるはず
尤も、支店側がデタラメなコードや存在しない科目とかを記入して来たら、ちゃんと校正チェックする作業は
必要だろうが、それが発生する・できてしまう部分を見直ししなきゃいけない

**デフォルトの名無しさん** · 2024/11/24(日) 14:56:03.67

>>826
俺も事務屋（経理）のはずなんだがな…
システム整えないと業務量が膨大すぎてしんでしまう
>>827
ありがとう。参照してみます。
なんか考えれば考えるほどVBAでどうにかするより、元のExcelファイル作り替えるか小口現金廃止するしかなさそうだね

**デフォルトの名無しさん** · 2024/11/24(日) 22:48:24.11

弥生会計ユーザーライセンス払いたくなくて、エクセルでサブシステム作るパターンか

**デフォルトの名無しさん** · 2024/11/25(月) 00:33:21.31

>>797
せいかい VBエディター
まちがい VBエディタ

**デフォルトの名無しさん** · 2024/11/25(月) 10:30:13.05

せいかい　エディター
まちがい　工ディタ一

**デフォルトの名無しさん** · 2024/11/26(火) 00:52:44.14

>>831
タも夕にしろよ

**デフォルトの名無しさん** · 2024/11/26(火) 10:03:25.21

せいかい　エディター
まちがい　工デT夕一

警備員[Lv.1][新芽] · 2024/11/26(火) 13:09:04.88

せいかい　エディター
まちがい　工〒゛T夕ー

**デフォルトの名無しさん** · 2024/11/27(水) 08:56:23.39

そこまで崩していいんなら濁点も:にして、イはTよりλのが近くないか

警備員[Lv.4][新芽] · 2024/11/27(水) 09:12:47.55

いや、一気にやったら続かないじゃない

**デフォルトの名無しさん** · 2024/11/27(水) 12:57:25.11

Dim rg1, rg2 as Range
rg1 = Cells(1, 1) ' 2024-12-31
rg2 = Cells(2, 1) '(空欄)
rg2.value = rg1.value
このようにA1の"2014-12-31"をA2にコピーしようとすると、
A2のセルの値が45657になってしまいます
値そのままA2にコピーする方法をご教示いただきたくおもいます
よろしくお願いします

**デフォルトの名無しさん** · 2024/11/27(水) 13:52:55.91

セルの値をそのままコピーするためには、コピー先のセルの数値形式を日付に設定する必要があります。以下のコードで、A1の値をA2にそのままコピーできます。

vba
Dim rg1 As Range, rg2 As Range
Set rg1 = Cells(1, 1) ' 2024-12-31
Set rg2 = Cells(2, 1) '(空欄)
rg2.Value = rg1.Value
rg2.NumberFormat = rg1.NumberFormat ' 数値形式をコピー

**デフォルトの名無しさん** · 2024/11/27(水) 16:51:15.01

>>838
すみません、言葉足らずでした
A1には文字列がはいっており、
場合によっては日付のようにも見えますが、
日付ではないので、値は"2024-12-32"なども取り得ます
他から取得するデータなので、この文字列はどうしようもありません
この値を、VBAを用いて他のセルにコピーすると、
文字列なのに日付と解釈され、日時型の値としてコピーされてしまいます
これを防ぎたいというのが趣旨です

**デフォルトの名無しさん** · 2024/11/27(水) 18:21:30.61

>>839
値を文字列変数に取得
値の設定先セルの書式を文字列に
変数値を設定先に代入
とやりたいことそのまま書く

**デフォルトの名無しさん** · 2024/11/27(水) 18:35:22.56

了解しました。それでは、A1の文字列が日付として解釈されないように、文字列としてコピーする方法をお教えします。以下のVBAコードを試してみてください。

vba
Dim rg1 As Range, rg2 As Range
Set rg1 = Cells(1, 1) ' "2024-12-32" などの文字列
Set rg2 = Cells(2, 1) ' コピー先のセル
rg2.Value = "'" & rg1.Value ' 値を文字列としてコピー

このコードでは、`rg1.Value`の前にシングルクオート（'）を追加して、値を強制的に文字列としてコピーしています。これにより、A2セルにコピーした値が日付として解釈されるのを防ぐことができます。

**デフォルトの名無しさん** · 2024/11/28(木) 18:36:22.65

.Value(デフォルトプロパティ)じゃなくて、.Textをコピーすればいいんじゃね

**デフォルトの名無しさん** · 2024/11/29(金) 02:09:38.98

↓ これっともっとすっきり書けない？　

If hoge > 75 Then
　 '処理1
Else
　If hoge > 50 Then
　　'処理2
　Else
　　If hoge > 25 Then
　　　'処理3
　　Else
　　　'処理4
　　End If
　End If
End If

警備員[Lv.22] · 2024/11/29(金) 02:36:57.16

すっきりじゃないかもしれないけど。
比較する条件がhogeだけならCase isでもいいと思う。select caseで調べてみて。

Select Case true
Case hoge>75
処理1
Case hoge>50
処理2
Case hoge>25
処理3
Case else
処理4
End Select

**デフォルトの名無しさん** · 2024/11/29(金) 03:40:38.72

>>843
抽象的な質問には無難な回答しかできない
Else と If をくっつければ End If が1回で済む
「処理」は Sub に飛ばして判定ロジックと分けると読みやすくなる

If hoge > 75 Then
　　Call 処理1
ElseIf hoge > 50 Then
　　Call 処理2
ElseIf hoge > 25 Then
　　Call 処理3
Else
　　Call 処理4
End If

**デフォルトの名無しさん** · 2024/11/29(金) 04:47:37.78

すっきり書けるかどうかは状況によるなあ
たとえばhogeが整数型で100点満点のテストの点数だったら、こういう書き方もできる

Select Case hoge
　　Case 0 To 25
　　　　処理1
　　Case 26 To 50
　　　　処理2
　　Case 51 To 75
　　　　処理3
　　Case 76 To 100
　　　　処理4
End Select

**デフォルトの名無しさん** · 2024/11/29(金) 07:48:42.48

>>840-842
ダメでした
しかも詳細を書こうとするともう余所エラーが出ます

**デフォルトの名無しさん** · 2024/11/29(金) 13:07:52.33

文字列型変数の値は"2024-12-31"でも、
Range型のValueプロパティに代入すると勝手にシリアル値が代入される
フォーマットもGeneralからyyyy/m/dに変わる

**デフォルトの名無しさん** · 2024/11/29(金) 13:08:16.00

代入元が"2024-12-32"の時は、代入先のセルも同値が入る

**デフォルトの名無しさん** · 2024/11/29(金) 13:08:48.76

"'2024-12-31"をセルに代入し、
MID関数で"'"を取りのぞいても、やはりシリアル値になる
簡単にできると思っていたことが難しいです…

**デフォルトの名無しさん** · 2024/11/29(金) 13:11:46.28

レス分けたら詳細書けました
クリップボード経由してPasteSpecialメソッドを用いると、
テキストとしての"2024-12-31"もセルに入れることができる
Excelの仕様の問題のような気がしてきました

**デフォルトの名無しさん** · 2024/11/29(金) 18:10:43.05

先にセルの書式を文字列 @ にしてみては？

**デフォルトの名無しさん** · 2024/11/29(金) 18:36:49.21

>>852
うまくいきました！
>>840のアドバイスを試す際、
コード内に@と明示せずGeneralにして試したのも間違いでした
お二人とも本当にありがとうございました！

**デフォルトの名無しさん** · 2024/11/29(金) 21:22:22.42

>>844

苔で出来ました。

**デフォルトの名無しさん** · 2024/11/29(金) 22:54:45.08

a=(hoge>75)*100+(hoge>50)*10+(hoge>25)*1
on log10(a)-1 goto 処理3,処理2,処理1

こういうイメージは嫌われるんですかね。

**デフォルトの名無しさん** · 2024/11/29(金) 23:05:46.40

>>853
うまくいってよかった
＠予め指定するのが肝でしたから
今回は文字列固定でのコピーでしたけど、他の書式も混在になることが予想されるならコピー元の書式をコピー先に設定するようにしといてもいいかもしれません

**デフォルトの名無しさん** · 2024/11/30(土) 09:08:08.19

Int(hoge / 25)

**デフォルトの名無しさん** · 2024/12/05(木) 11:53:46.88

甲斐はいらん。巨人に来るな。

**デフォルトの名無しさん** · 2024/12/07(土) 11:24:04.60

私が作ったVBAがうまく動かないんですがどこにバグがありますか？ご教示おねがいします

**デフォルトの名無しさん** · 2024/12/07(土) 14:05:32.60

知能にバグ

**デフォルトの名無しさん** · 2024/12/07(土) 14:45:24.46

知恵袋より酷い質問だな

**デフォルトの名無しさん** · 2024/12/07(土) 17:34:43.76

だな

**デフォルトの名無しさん** · 2024/12/07(土) 18:08:11.98

>>859
あなたが低脳猿なところに問題がある。

**デフォルトの名無しさん** · 2024/12/07(土) 23:19:44.56

RubyのようにVBAを作った？

**デフォルトの名無しさん** · 2024/12/09(月) 11:28:04.58

知恵袋もそうだが、まずはソースコードを見せてもらわないと話にならん事が分からんのか？

**デフォルトの名無しさん** · 2024/12/09(月) 12:17:07.04

ネタにマジレスという愚かな事が分からんのか？

**デフォルトの名無しさん** · 2024/12/09(月) 13:00:32.05

バグバグで抜いた

**デフォルトの名無しさん** · 2024/12/10(火) 01:01:19.96

COM考えたやつってもしかして天才なんです？
20年以上前のシステムがいまだに第一線で原液だとか

**デフォルトの名無しさん** · 2024/12/10(火) 13:23:10.76

>>868
COMファイルはMS-DOS時代の産物

**デフォルトの名無しさん** · 2024/12/10(火) 13:45:36.94

>>868
バイナリレベルのオブジェクト指向、インターフェース指向は素晴らしかったと思うよ

**デフォルトの名無しさん** · 2024/12/10(火) 15:02:21.25

>>869
メモリにそのまま展開される危険なファイル

**デフォルトの名無しさん** · 2024/12/10(火) 17:16:10.86

逆に移行を妨げてるんだろね、現行システムからの反発激しくて

**デフォルトの名無しさん** · 2024/12/11(水) 01:28:47.06

「反発激」という用語なのかと思った

**デフォルトの名無しさん** · 2024/12/21(土) 09:32:36.56

画像サイズが変わってしまい困っています。
メモの編集→コメントの書式設定→色と線タブ→塗りつぶし効果で画像を挿入しています。
サイズタブ→原型のサイズ→リセットを行うにはどうしたら良いでしょうか？

**デフォルトの名無しさん** · 2024/12/21(土) 10:48:06.83

>>868
昔の人は明らかに頭が良かった

>>872
遺構を妨げてるんじゃなくて以降がスムースに逝ってる証拠だよ

**デフォルトの名無しさん** · 2024/12/21(土) 11:27:23.27

>>874
それはVBAの話しなのか？

**デフォルトの名無しさん** · 2024/12/21(土) 13:33:30.79

>>874
画像のサイズが変わってしまった場合、元のサイズにリセットする方法についてお答えします。

1. **メモの編集**モードに入ります。
2. **コメントの書式設定**を開きます。
3. **色と線タブ**を選択します。
4. **塗りつぶし効果**で画像を挿入します。
5. **サイズタブ**を開きます。

ここで、以下の手順を試してみてください：

- **リセットボタン**がある場合、それをクリックして元のサイズに戻します。
- リセットボタンがない場合、手動で**元のサイズ**に調整する必要があります。挿入した画像の元の幅と高さの値を入力します。

これにより、画像のサイズが元に戻るはずです。もし他にもお困りの点があれば、教えてください。

**デフォルトの名無しさん** · 2024/12/21(土) 15:52:44.31

マクロでわからないことがあったらCHatGPT に聞くようになった。
すごいのは、やりたいことを書いてEXCELファイルを添付すると、マクロを組んでくれること。
問題はCHatGPT 頼りになるので、自分のスキルが向上しないことw

**デフォルトの名無しさん** · 2024/12/21(土) 16:31:15.48

>>876
>>877
上記の動作をVBAで行う方法が知りたいです
LockAspectRatio、TextFrame.AutoSize等を試しましたがうまくいきませんでした
マクロ記録もやってみましたがリセットの動作は記録されないようです
メモ内の埋め込み画像の元サイズを取得する方法ってありますか？

**デフォルトの名無しさん** · 2024/12/21(土) 21:28:57.26

自己解決しました