- 締切済み
エクセルマクロで既定値
マクロ勉強しだしたばかりでさっきから苦戦してるんですが、マクロでオートシェイプの線とか円を書く前に、既定値を決めてやる方法ってあるんですか？ ・塗りつぶしなし ・透明０％ ・線幅１．５ ・色は水色 とかで統一したく、教えていただきたいです。 よろしくお願いします。
- spaghetti09
- お礼率79% (35/44)
- オフィス系ソフト
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
みんなの回答
- ASIMOV
- ベストアンサー率41% (982/2351)
マクロの記録で、調べれます ＞塗りつぶしなし Selection.ShapeRange.Fill.Visible = msoFalse ＞線幅１．５ Selection.ShapeRange.Line.Weight = 1.5 ＞色は水色 Selection.ShapeRange.Line.ForeColor.SchemeColor = 15 ＞透明０％ そんな項目は．．．？
関連するQ&A
- Excelでオートシェイプの既定値が元にもどりません。
いろいろな設定をしていたらオートシェイプ（直線）の既定値が青色の点線に変わってしまいました。 元に戻そうと黒色の実線を作成し”オートシェイプの既定値に設定”を選択して元の標準の直線に戻そうとしたのですが、そのファイル内では標準に戻ったのですが、別のファイルを開くとまた青色の点線に戻ってしまいます。 他にどのような設定をしたら元に戻すことができるのでしょうか？ 教えてください。
- 締切済み
- オフィス系ソフト
- エクセル マクロ オートシェイプ 縦線
エクセルのマクロで，以下の条件でオートシェイプの縦線を引きたいと思っています。 条件(1) 縦線を引く範囲は，セルを選択している範囲（任意）の中央を通るようにしたいです。 条件(2) 縦線の太さは一番細い線，色は赤色です。 なお，条件(2)の線の太さ，線の色は，マクロのどの部分を変更すればよいのかもご教授いただけるとありがたいです。 どうぞよろしくお願いいたします。
- ベストアンサー
- Excel（エクセル）
- 塗りつぶし機能について
パワーポイントの塗りつぶし機能についてですが、オートシェープで四角や円等を作成してからでないと、塗りつぶしは出来ないのでしょうか？自分で線4本で四角形を作っても塗りつぶしは出来ないのですよね？ 今Auto CADで作図したデータをpptで色を塗ろうかと思ったのですが、作図を一度、グループ解除した後に塗ろうと思うと、作図で作った線がばらばらになってしまい、色が塗れません、Auto CAD内で塗れば良いのですが、他のオートシェープでの作図と統一感がなくなってしまうので是非統一したいのですが、どなたかいい方法知らないでしょうか？
- 締切済み
- オフィス系ソフト
- オートシェイプ 「既定のデザイン」はない？
オートシェイプを挿入する機会が多く、 同じデザインのオートシェイプを使いたいのですが 「既定のデザイン」みたいな方法はないのでしょうか？ 一度設定したデザインをコピペするしかないですか？ パワポ２００３の時は、 既定のデザインみたいな項目があったはずですが２０１０はないのでしょうか？
- ベストアンサー
- PowerPoint（パワーポイント）
- Ｅｘｃｅｌでマクロを消すには
マクロが組み込まれているＥｘｃｅｌ２００３のファイルがあります。 マクロについて詳しくわからないのですが、複数の伝票シートを一括印刷するボタンがあったり、 チェックボックスに応じてオートシェープや文字が切り替わる機能があります。 この伝票のひな形だけを使いたく、枠や文字だけを新しいシートに値でコピーし、 別名で保存しました。 ボタンやオートシェープはありません。 また、ツール→マクロを選んでも特に何も見当たりませんでした。 しかし、このファイルを開くたびに このファイルにはマクロが… [マクロを有効にする][マクロを無効にする] というダイアログが表示されてしまいます。 マクロを消すといいますか、このダイアログが表示されないようにする方法がありましたら 教えてください。 よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- エクセルでマクロの記録での質問です。
エクセルでマクロの記録での質問です。 現在、図形の四角ボタンを押すとオートシェイプのコネクタの線を太さ1.5（通常0.75）に太くするという記録をしました。 これを赤い線に修正したいのですがどうすればいいのでしょうか？おそらく右クリックしてマクロの登録→編集というながれだと思うんですがVisual Basicの画面で英語だらけの画面になります。ここでなにか修正をするんでしょうか？これは内容を見てみないとアドバイスは難しいでしょうか？。初めからやればとお思いでしょうがこれを気にお勉強と思って聞いてみました。教えてください。
- ベストアンサー
- オフィス系ソフト
- エクセルを使って。。。
いつもお世話になっております。 エクセルを使っての質問なんですが。。。 オートシェイプで四角を作ります。この四角は黄色で塗りつぶします。 そこへテキスト編集で文字を入れ込みます。例えばＡＢＣ。 入れ込むのは簡単なのですが、この文字をオートシェイプとその後に またがって作る事は可能でしょうか？ オートシェイプの色を「塗りつぶしなし」にすれば、ＡＢＣ の文字の 丁度まん中に四角の線の部分が乗っかる感じなのですが、色をつけてしまうとＡＢＣの半分が色でつぶされてしまうわけです。。。 とても悩んでいます。どなたかご教授ください。よろしくお願いします。
- ベストアンサー
- Windows XP
- Word--オートシェイブの既定値
Wordです。 テキストボックスの周りの線が要らないので、テキストボックスの書式設定で線なしに設定します。 （ほとんどのテキストボックスは線が要らないので、）右クリックして「オートシェイブの既定値に設定」を選びます。 すると、次からはテキストボックスを描くと、線なしのテキストボックスになります。 問題なのは、テキストボックスだけでなく他の図形（たとえば直線）も線なしになってしまいます。 テキストボックスの既定値だけを線なしにして、他の図形は線ありの既定値にしたいのですが、どうすればよいですか。 （Word2000）
- ベストアンサー
- オフィス系ソフト
- EXCEL オートシェイプの線を消す方法
よろしくお願いします。 ＥＸＣＥＬで オートシェイプで線を引きました。 ところがマクロで表の複写を組んでしまったために 複写と複写が重なり オートシェイプの罫線が同じ場所に1000ぐらい？に重なってしまいました。(もっと多いかもしれません。） しかしどうしてもそのシートを削除するわけにはいきません。 出来るだけ簡単に 1000回？重なっているだろうオートシェイプの罫線を 消す方法はありますか。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- マクロでオートシェイプをカーソル付近に出す
Wordのマクロで、書式設定済みのオートシェイプを 手早く出せるように、さっき作ってみたのですが… その時、ページの上のほうで作ったせいか、 下のほうに出したい時も、上のほうに出てしまいます； マクロで、ちゃんとカーソル付近にオートシェイプを 出すには、どうすれば良いですか？教えてください。
- ベストアンサー
- オフィス系ソフト
お礼
自己解決しました（たぶん）。 出来たと思います。すみませんでした。 回答ありがとうございました。
補足
うーん；； バグってるとしか思えない；； 私のエクセルは今、下のプログラムでやると、 塗りつぶしありの円がでてくるんですが、 どこか間違ってますか？ 下は塗りつぶしなしのつもりでやってるんですが、、 Sub Sample2() ActiveSheet.Shapes.AddShape(msoShapeOval, 153#, 49.5, 108#, 101.25).Select Selection.ShapeRange.Fill.Visible = msoFalse Selection.ShapeRange.Fill.Solid Selection.ShapeRange.Fill.Transparency = 0# Selection.ShapeRange.Line.Weight = 1.5 Selection.ShapeRange.Line.DashStyle = msoLineSolid Selection.ShapeRange.Line.style = msoLineSingle Selection.ShapeRange.Line.Transparency = 0# Selection.ShapeRange.Line.Visible = msoTrue Selection.ShapeRange.Line.ForeColor.SchemeColor = 15 Selection.ShapeRange.Line.BackColor.RGB = RGB(255, 255, 255) Range("D7").Select End Sub