Hallo,
ich brauche ein Makro, das an einer Schaltfläche angebracht wird, und bei Betätigen dieser +1 zu Zelle A1 addiert und in Zelle A2 "X" schreibt. Ich glaube ich weiß schon, wie der Anfang aussehen muss:
Sub Schaltfläche 2
thisComponent.sheets().getbyname("Tabelle1").getcellrangebyname("A1").value =_
thisComponent.sheets().getbyname("Tabelle1").getcellrangebyname("A1").value + 1
der zweite Teil dann circa so:
thisComponent.sheets().getbyname("Tabelle1").getcellrangebyname("A2").string = "X"
End sub
Jetzt weiß ich aber nicht, wie die Verbindung zwischen den beiden Teilen aussehen soll, bzw ist das bisher überhaupt richtig?
Vielen Dank schonmal!
[GELÖST]Verbindung Makro mit zwei Befehlen schreiben
Moderator: Moderatoren
-
- **
- Beiträge: 21
- Registriert: Mo, 01.02.2021 14:10
[GELÖST]Verbindung Makro mit zwei Befehlen schreiben
Zuletzt geändert von AlinaGeier am Fr, 12.02.2021 08:29, insgesamt 1-mal geändert.
Re: Verbindung Makro mit zwei Befehlen schreiben
Hallo Alina,
ein Beispiel:
ein Beispiel:
Code: Alles auswählen
REM ***** BASIC *****
Sub Schaltflaeche2
REM https://wiki.openoffice.org/wiki/DE/Makro_Basic_Tutorial#Variablen
Dim fVal As Double
' oder
' Dim nVal As Long
Dim sStr as String
oCellA1=thisComponent.sheets().getbyname("Tabelle1").getcellrangebyname("A1")
oCellA2=thisComponent.sheets().getbyname("Tabelle1").getcellrangebyname("A2")
fVal=oCellA1.value
oCellA1.value = fVal+1
oCellA2.string = "X"
End sub
Gruß
Craig
_____________________________________________________
WIN 10 Pro 64-Bit • LO 7.1.5.2 (x64) • AOO 4.1.8
Craig
_____________________________________________________
WIN 10 Pro 64-Bit • LO 7.1.5.2 (x64) • AOO 4.1.8
-
- **
- Beiträge: 21
- Registriert: Mo, 01.02.2021 14:10
Re: Verbindung Makro mit zwei Befehlen schreiben
Vielen Dank! Klappt super.
LG, Alina
LG, Alina