none
(Sumber: milist MUGI) Memindahkan textbox di Word RRS feed

  • Pertanyaan

  • Agan,

    Saya menggunakan kode dibawah untuk membuat sebuah textbox, ini bisa dijalankan dalam Excel

      wrdDoc.Shapes.AddTextbox(Orientation:=msoTextOrientationHorizontal, _
        Left:=660, Top:=100, Width:=165, Height:=40).TextFrame.TextRange = _
        "MARKET and CREDIT RISK COMMENTS"

    Selanjutnya yang saya inginkan adalah memformat textnya menjadi bold, meletakkan di center dan mengisi warna background. Namun kenapa saya tidak bisa menjalankannya di word? Mohon bantuannya para master..

     

     


    Agnes Sannie [MSFT]
    MSDN Community Support | Feedback to us
    Get or Request Code Sample from Microsoft
    Please remember to mark the replies as answers if they help and unmark them if they provide no help.
    Rabu, 19 Oktober 2011 10.05
    Moderator

Jawaban

  • Halo,

    Terima kasih atas partisipasi anda dalam forum MSDN Indonesia.

    Anda seharusnya tidak mengalami masalah karena Shape object digunakan dengan cara yang sama baik dalam Word maupun Excel dan seluruh aplikasi Office lainnya.

    Mulailah dengan mencantumkan object untuk Shape yang ingin anda masukkan dan letakkan sebuah textbox didalamnya seperti kode berikut:

    Dim shp as Word.Shape
    Set shp = wrdDoc.Shapes.AddTextbox('etc.)

    Text content akan diakses melalui Shape TextFrame.TextRange property. Jadi akan lebih baik jika anda menggunakan Range object. Contohnya seperti berikut.

    Dim rng as Word.Range
    Set rng = shp.TextFrame.TextRange
    rng.Text = "my text"
    rng.Font.Bold = True
    rng.Paragraphs.Alignment = wdAlignParagraphCenter


    Agnes Sannie [MSFT]
    MSDN Community Support | Feedback to us
    Get or Request Code Sample from Microsoft
    Please remember to mark the replies as answers if they help and unmark them if they provide no help.
    Rabu, 19 Oktober 2011 10.13
    Moderator