タグ

vbaとshapeに関するkiyo_hikoのブックマーク (4)

  • Solved: PowerPoint VBA: Text in shape created with BuildFreeForm does not center as expected | Experts Exchange

    kiyo_hiko
    kiyo_hiko 2014/09/10
    convertToShapeの直後にこう書いた。Dim s As Shape : Dim pts : (ry : Set pts = s.Nodes.Item(1).Points : s.Nodes.SetPosition 1, pts(1, 1), pts(1, 2) : s.TextFrame2.TextRange.ParagraphFormat.Alignment = msoAlignCenter 'ちなptsはVariantで受けりゃいいから陽な型注釈イラネ
  • クレジットカード現金化の高還元率の優良店を選ぶためには


           
    kiyo_hiko
    kiyo_hiko 2014/09/09
    Dim s As Shape; s.Fill.ForeColor.RGB = rgb ' rgb is a long value. Ex. RGB(200, 200, 255)
  • Excel VBAで図形(シェイプ)の文字・位置・色・サイズを設定

    HorizontalAlignment(水平方向)に使用する定数 xlHAlignLeft:左揃え xlHAlignRight:右揃え xlHAlignCenter:中央揃え VerticalAlignment(垂直方向)に使用する定数 xlVAlignBottom:下揃え xlVAlignCenter:上下中央揃え xlVAlignTop:上揃え TextFrameオブジェクトを使った設定は、図形だけでなくテキストボックスにも使用できます。 図形に関連する「Excel VBAで図形(シェイプ)の位置・線色・塗りつぶしの色等を設定する」も掲載していますので、参考にしてください。 TextFrameオブジェクトを使用し、図形の文字・位置・色・サイズの設定を設定するVBA Excel VBA シートコード 作成したコマンドボタン クリックイベントの説明 Textプロパティで表示する文字列を設定

  • マクロを実行すると画像がズレてしまいます


    VBA  VBA  1A32A3 Private Sub CommandButton1_Click() Dim strFilter As String Dim Filenames As Variant Dim PIC As Picture '  strFilter = "(*.jpg;*.jpeg;*.gif;*.bmp;*.png),*.jpg;*.jpeg;*.gif;*.bmp;*.png" Filenam
    マクロを実行すると画像がズレてしまいます
    kiyo_hiko
    kiyo_hiko 2014/01/04
    以前自作したVBA作図ツールを暇つぶしで2010に移植してたらオートシェイプ全般でこの現象が起きて激おこ 2003はちゃんと動いたのに2010クソだなー
  • 1