Seite 1 von 1
Inhalt einer Zelle auslesen
Verfasst: Fr, 20.05.2005 02:32
von DeltaPi
Ich habe überall gesucht, wahrscheinlich sogar die richtige lösung gefunden aber überlesen oder nicht verstanden.... also los
Wie kann ich den Inhalt aus A1 meiner aktuellen Tabelle 1 auslesen und in einer MessageBox ausgeben
Verfasst: Fr, 20.05.2005 07:01
von fichte.buche
Eine Möglichkeit ist folgendes Macro
Sub Main
Dim Doc As Object
Dim Sheet As Object
Dim Cell As Object
Dim Inhalt as Variant
Doc = thisComponent
Sheet = Doc.Sheets(0)
Cell = Sheet.getCellByPosition(0,0)
Inhalt = Cell.Text
msgbox Inhalt
End Sub
mfg
Fichte.Buche
Verfasst: Fr, 20.05.2005 18:07
von moritz
Versuchs mal so:
Sub Main
Dim Doc As Object
Dim Sheet As Object
Dim Cell As Object
Dim Inhalt as Variant
Dim sInhalt as string
Doc = thisComponent
Sheet = Doc.Sheets(0)
Cell = Sheet.getCellByPosition(0,0)
sInhalt=Cell.getstring 'Zahlen und Zeichenketten
Inhalt = Cell.Value 'nur Zahlen
msgbox sInhalt
msgbox Inhalt(0)
End Sub
Moritz
Verfasst: Sa, 21.05.2005 02:59
von DeltaPi
Danke, es funktioniert...super jetzt kann ich endlich mal anfangen
