spinnifex
Goto Top

Excel-VBA nach Word-VBA übersetzen (V. 2010)

Hallo Admins,

wie kann ich folgendes XL-Makro nach Word übersetzen, wobei die Zelladresse "A1" als Textmarke "Anzahl" angesprochen werden soll?

    Option Explicit
    Private Sub Hochzaehlen()
    Dim Wert As Integer
    Wert = Range("A1")  
    Wert = (Wert + 1)
    Range("A1") = Wert  
    End Sub

Die Problematik integerund stringist mir an der Stelle klar. Falls es mit einem benutzerdefinierten Schnellbaustein / Feld einacher ist, wäre ich auch hier für einen Tipp dankbar.

Vielen Dank im Voraus!

spinnifex

Content-ID: 298397

Url: https://administrator.de/contentid/298397

Printed on: November 10, 2024 at 04:11 o'clock

126919
Solution 126919 Mar 06, 2016 updated at 12:50:19 (UTC)
Goto Top
With ActiveDocument.Bookmarks("Anzahl")  
    .Range.Text = CInt(.Range.Text) + 1
End with
Gruß fk
spinnifex
spinnifex Mar 06, 2016 at 12:50:25 (UTC)
Goto Top
Einfach nur vielen lieben Dank

für diese einfache Lösung !!

Spinnifex