タグ

badknowhowとVBAに関するkenjiro_nのブックマーク (5)

  • MS Office Excel2016, Word2016: 図形の網掛け(塗りつぶし(パターン))と透明度の設定 - とあるヲタクの超電波ブログ

    PC記事は自分用の備忘録(真似するときは自己責任で)。コメントへの返事が大変になってきたのでするの諦めました(ゴメン) Excel2016,Word2016にて図形の網掛けをしたのはいいが,透明度の設定がなくて背景を透かして見せることができず困った。 で,さっそくググって調べるとあっさり解決(^^)でも,時間が経てば忘れるのでメモに残しておくことにしました。 ちなみに,Excel2013,Word2013でも同様の方法でできるようです。 例えばExcelで上のようなギザギザの星図形を作ったとします。 この図形を「塗りつぶし(パターン)」にて網掛けをします。 1) 図形をワン・クリック(左クリック)して選択します。 2) 「書式タブ」にある「図形のスタイル」の右下の部分をクリックする すると右側に「図形の書式設定」が開きます。(ちなみに,図形を右クリックして「図形の書式設定」を選択しても同じ

    MS Office Excel2016, Word2016: 図形の網掛け(塗りつぶし(パターン))と透明度の設定 - とあるヲタクの超電波ブログ
    kenjiro_n
    kenjiro_n 2021/09/08
    図形を選択したあとにVBAのイミディエイトウィンドウで Selection.ShapeRange.Fill.Transparency = 0.8 (右辺は1.0で透明、0.0で不透明となる値)と入力すると良いとのこと。なんで図形の詳細で調整できないんですかね。
  • セル範囲の名前の設定と削除 | Excel作業をVBAで効率化

    Excelでのセル範囲の名前の設定と削除 セルはA1形式やR1C1形式での座標で表されますが、それとは別に、セル範囲に「名前」を付けて座標の変わりに使うことができます。 Excelでの名前を付ける手順は、名前を付けたいセル範囲を選択して、数式バーの左にある「名前ボックス」に任意の名前を入力します。 名前を削除したい場合は、数式タブ→定義された名前→名前の管理をクリックすると、名前の管理ダイアログが表示されるので、対象の名前を選択→削除ボタン、となります。 以降ではVBAで同じ操作を行う方法を紹介します。 RangeオブジェクトのNameプロパティは、Rangeオブジェクトに指定したセル範囲の名前の取得や設定を行うことができます。 ここで付けた名前を利用することで、セル範囲を参照する際にA1などのセルを指定せずに名前で指定することが可能になります。 名前の設定にはNameプロパティをそのまま

    セル範囲の名前の設定と削除 | Excel作業をVBAで効率化
    kenjiro_n
    kenjiro_n 2020/03/24
    一括で削除するVBAのコードもあった。これは本当に助かる。印刷範囲は Print_Area という名前だったはずなんでこれを避ける条件分岐が必要になるはずだけど。
  • Excelのワークシート関数で正規表現を使う - Qiita

    はじめに 皆さんは「Excelのワークシートで正規表現が使えたら良いのに・・・」と思ったことはないでしょうか? ご存知の通り、正規表現を使うと、ワイルドカードなどとは比較にならない柔軟さで、条件に一致する文字列を指定することができるようになります。 この記事では、文字列抽出の条件に正規表現を使用できるユーザ定義関数を作成する方法を紹介します。 設計方針 Excelには、正規表現の関数が無いので、VBAとVBScriptのRegExp関数を組み合わせることで、ユーザ定義関数を作成します。 作成する関数は、ワークシート関数として使いやすいように、以下のような動作で作成しました。 戻り値は1つだけ。 (複数マッチは無視して、最初にマッチした文字列だけを取り扱う。) オプションでサブマッチに対応する。 サブマッチを使用する場合は、正規表現でグループ化をした上で、第三引数にサブマッチのindexを指

    Excelのワークシート関数で正規表現を使う - Qiita
    kenjiro_n
    kenjiro_n 2016/02/04
    助かるけど結構ステップ数が多い。
  • 関数を含むクエリを開くとエラー メッセージ "式に未定義関数 <FunctionName> があります" が表示される

    kenjiro_n
    kenjiro_n 2016/01/18
    VBAでの参照設定でチェック漏れがないか確認しましょうという話。
  • excel オートシェイプ図形内の文字を一括コピー - OKWAVE

    いいえ,できません。 エクセルでは一個ずつやるしか,方法はありません。 作業例: ALT+F11を押す 現れた画面で挿入メニューから標準モジュールを挿入する 現れたシートに下記をコピー貼り付ける sub macro1() dim s as shape on error resume next for each s in activesheet.shapes s.topleftcell = s.textframe.characters.text next end sub sub macro2() dim s as shape dim buf as string on error resume next for each s in activesheet.shapes buf = buf & "," & s.textframe.characters.text next range("A1")

    excel オートシェイプ図形内の文字を一括コピー - OKWAVE
    kenjiro_n
    kenjiro_n 2014/07/16
    VBAを使えば可能という回答。
  • 1