nochmal formatierung mit macro

[keksi1970]

da mir in meinem thread viewtopic.php?f=18&t=15855&p=66131#p66131 mitgeteilt wurde, für ein neues problem einen neuen thread zu öffnen, tu ich das hiermit

also die lösung zu dem prob funzt wunderbar, NUR

Code: Alles auswählen

Sub TeilstringSuchen
   myDoc = thisComponent
   Tabellenname=mydoc.currentcontroller.activesheet.name
   mySheet = myDoc.Sheets().getByName(Tabellenname) 'aktives Tabellenblatt
     for x = 0 to 999
   ZahlInput = inputbox ("Bitte Zahl eingeben / Ende mit 999")
   if ZahlInput = "999" then
   x = "999"
   end if

   for i = 0 to 999 
   myCell = mySheet.getcellbyposition(0,i) 'Zeile A1 bis A999 // 0=A, 1=B
   ZahlSheet = split(myCell.value,",")
   Zahl =  ZahlSheet(0)
   if ZahlInput = Zahl then 
   myCell.Cellbackcolor = RGB (57, 128, 244)
   end if
   Next i

  Next x
End Sub

das makro markiert zellen einer bestimmten spalte, die zahlen beinhalten, die ich in einem fensterchen eingebe
dieses makro möchte ich so ändern, dass es nicht die aktuelle zelle markiert, sondern die zelle 2 spalten weiter.

bsp : zelle a23 hat den erforderlichen wert, so soll zelle C23 blau markiert werden

kann mir wer helfen ?? *ganz lieb guckt

[Karolus]

Hallo
Ändere:
myCell.Cellbackcolor = RGB (57, 128, 244)
zu:
mysheet.getcellbyposition(2,i).Cellbackcolor = RGB (57, 128, 244)

Gruß Karo

[keksi1970]

danke karo funktioniert

nur was zum henker bedeutet "mysheet" ?? sowas wie aktuelle auswahl ? ach, soviele anfaengerfragen