[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『印刷マクロ』(ハイチュウ)
エクセルファイルは3つのシートがあります。
sheet1=宛名印刷フォーマット
sheet2=変更届フォーマット
sheet3=住所録元データ
・宛名印刷ボタン/変更届ボタンの2つ作りたい
※住所録から通番を使用して、sheet1/sheet2のフォーマットへ転記してます
・住所録元データの”C2”セルに印刷したい通番を記載”C3”に枚数を記載
上記のようなマクロを作りたい。
標準モジュールへ貼り付けをするVBAを教えてください。
よろしくおねがいします。
< 使用 Excel:unknown、使用 OS:unknown >
Sub test() With ActiveSheet.OLEObjects.Add(ClassType:="Forms.CommandButton.1", _ Left:=65.25, Top:=24, Width:=82.5, Height:=32.25) .Object.Caption = "宛名印刷" End With With ActiveSheet.OLEObjects.Add(ClassType:="Forms.CommandButton.1", _ Left:=65.25, Top:=60, Width:=82.5, Height:=32.25) .Object.Caption = "変更届" End With
With Sheets("住所録元データ") .Range("C2") = "印刷したい通番" .Range("C3") = "枚数" End With End Sub (???) 2016/08/24(水) 13:42
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.