[過去ﾛｸﾞ] Excel VBA 質問スレ Part68 (1002ﾚｽ)
上下前次1-新
このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ
694: (ﾜﾝﾄﾝｷﾝ MMd2-gpcg) 2020/10/27(火)11:38 ID:ptoZa2VhM(1) AAS
Wordの2ページ目以降にラベルを追加する方法について教えてください
エクセルからWordを呼び出して、ラベルを追加しようとしています
以下のように記載しました
Set newDoc wdApp.Documents. Add
newDoc.Shapes.AddLabel msoTextOrientationHorizontal, 35, 300, 30, 20
AddLabelの第二引数(300になっているところ)を増やせば2ページ目以降に追加されると思いましたが消えてしまい上手くいきません
すみませんがどうすればいいかご教示お願いいたします
695(1): (ｽｯﾌﾟ Sda2-oXyV) 2020/10/27(火)12:32 ID:g67UH/S6d(1) AAS
>>692
それ、Rangeの範囲わかるよね。
696(2): (ﾜｯﾁｮｲ eef2-dv2+) 2020/10/27(火)16:07 ID:rqaBQIGU0(3/3) AAS
>>695
わからない場合です
いちおうuboundとかで出せるのは分かるけど流石にこれだと増長すぎるかなと
worksheets("sheet2").range(cells(1,1),cells(ubound(tmp),ubound(tmp,2))) = tmp
697(2): (ﾜｯﾁｮｲ e163-3xd8) 2020/10/27(火)18:11 ID:l1bcXJEN0(1/2) AAS
VBAを使うには記述の冗長さは諦めたほうがいい
その書き方で大正解だ
698: (ﾜｯﾁｮｲ e163-3xd8) 2020/10/27(火)18:13 ID:l1bcXJEN0(2/2) AAS
VBAの何が終わってるってこう言う書き方に少しも疑問を覚えない老害がいっぱいいるんだよな
699: (ｱｳｱｳｳｰ Sa45-TzND) 2020/10/27(火)18:22 ID:qZwcfAyua(1) AAS
一旦変数にいれればいいんじゃね
700: (ﾃﾃﾝﾃﾝﾃﾝ MMe6-FUnU) 2020/10/27(火)18:42 ID:6WpiGXJ0M(1) AAS
疑問に思ったところでどうしようも無く無いか
自分でクラスでも作るとか？
701: (ﾜｯﾁｮｲ ee63-S+8T) 2020/10/27(火)18:50 ID:D9T+kNV20(1) AAS
冗長にしたくなければテーブル使うのが1番手っ取り早いかなぁ
プロパティの分かりづらさとネット検索結果の貧弱さは仕方ない
702: (ﾜｯﾁｮｲ fd5f-zec2) 2020/10/27(火)19:33 ID:w/TzFTqy0(1/2) AAS
>>697
resizeはどうだ？
703: (ﾜｯﾁｮｲ fd5f-zec2) 2020/10/27(火)19:35 ID:w/TzFTqy0(2/2) AAS
最近おもいついたこと
ワークシート関数→波紋
VBAマクロ→幽波紋
704(2): (ﾜｯﾁｮｲ 21da-tMQb) 2020/10/27(火)23:01 ID:o6G0sPC10(1) AAS
>>689
裏技っぽいかは知らんがこれ好き
a = b = c
705(1): (ﾜｯﾁｮｲ 0563-9Kcm) 2020/10/27(火)23:03 ID:gj2Ohu8L0(1) AAS
>>679
ありがとうお勧めではないそうですが
教えてくださった方法でコメントアウトできたので
使いますww
706: (ｱｳｱｳｳｰ Sa45-ot4R) 2020/10/27(火)23:05 ID:WVQXu4mGa(1/2) AAS
代入が式の言語だと、結果 a、b、c が同値になるし、イヤだなぁ…
707: (ｱｳｱｳｳｰ Sa45-ot4R) 2020/10/27(火)23:13 ID:WVQXu4mGa(2/2) AAS
>>705
[表示]-[ツールバー]-[編集] で表示られるアイコンの左から9番目で選択範囲を一括コメント化、その右のアイコンでコメント解除
それも試してみてください
708: (ｱｳｱｳｳｰ Sa45-TzND) 2020/10/27(火)23:23 ID:2iVpt4JMa(1) AAS
>>704
おれは嫌い
709: (ﾗｸｯﾍﾟﾍﾟ MMeb-4t7V) 2020/10/28(水)06:32 ID:MUExsF8QM(1/2) AAS
マクロ実行後、
エクセルファイルを保存しようとすると
プライバシーに関する注意
というメッセージが出ます。
出ないよう設定できるようですが
セキュリティ的に不安です。
皆さんどのような対処をされてますか
いったんエクセルを全部終了するくらいしか
思いつきません
710(1): (ﾃﾃﾝﾃﾝﾃﾝ MMeb-1WjG) 2020/10/28(水)06:48 ID:MGib4+U5M(1) AAS
マクロ実行後、 ←この時点で手遅れ
711: (ﾗｸｯﾍﾟﾍﾟ MMeb-4t7V) 2020/10/28(水)08:53 ID:MUExsF8QM(2/2) AAS
>>710
実行前に他のエクセルを終了するのが
一般的でしょうか
712: (ﾄﾞｺｸﾞﾛ MMfd-frLi) 2020/10/28(水)12:22 ID:VqefcRCnM(1) AAS
>>704
好きとか嫌いとかじゃなくて
If b = c Then
a = True
Else
a = False
End If
みたいなコード書くなら
a = b = c
ッて書いた方が楽じゃね？
713: (ﾃﾃﾝﾃﾝﾃﾝ MMeb-gykd) 2020/10/28(水)12:26 ID:SBFJNMXDM(1/2) AAS
後から見直すときに前者の方が見やすい
書く時に楽かどうかは別にどうでもいいです
上下前次1-新書関写板覧索設栞歴
あと 289 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.012s