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/forum/excel-vba-nach-word-vba-uebersetzen-v-2010-298397.html

Ausgedruckt am: 22.12.2024 um 11:12 Uhr

126919
Lösung 126919 06.03.2016 aktualisiert um 13:50:19 Uhr
Goto Top
With ActiveDocument.Bookmarks("Anzahl")  
    .Range.Text = CInt(.Range.Text) + 1
End with
Gruß fk
spinnifex
spinnifex 06.03.2016 um 13:50:25 Uhr
Goto Top
Einfach nur vielen lieben Dank

für diese einfache Lösung !!

Spinnifex