Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
396to400
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
396to400
396to400
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

In eine andere Spalte springen

In eine andere Spalte springen
11.03.2004 16:17:39
Andi
hallo ich habe gerade dieses formum entdeckt vielleicht kann auch mir jemand helfen
ich habe ein makro aufgezeichnet um den ausdruck "Wert Gesamt" zu finden.
dann möchte ich in der selben zeile wo wert gesamt steht 16 spalten nach rechts springen und dort ein x eintragen.
danke an jeden helfer

Sub Makro1()
' Makro1 Makro
' Makro am 11.03.2004 von Andi aufgezeichnet
Cells.Find(What:="Wert Gesamt", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False).Activate
End Sub

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: In eine andere Spalte springen
11.03.2004 16:23:12
harry
hi,
activecell.offset(columnoffset:=16).value="x"
liebe grüße,
harry
AW: In eine andere Spalte springen
11.03.2004 16:26:02
Andi
Bin begeistert. Vielen Dank
AW: In eine andere Spalte springen
11.03.2004 16:26:16
Ulf_MS
Harry kanns besser aber hier mein Vorschlag

Sub Test()
Dim intLSpalt As Integer
Set wks = ActiveSheet
Cells.Find(What:="Wert Gesamt", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False).Activate
intLSpalt = wks.Cells(ActiveCell.Row, wks.Columns.Count).End(xlToLeft).Column + 16
wks.Cells(ActiveCell.Row, intLSpalt) = "x"
End Sub

Ulf_MS
AW: In eine andere Spalte springen
11.03.2004 16:45:28
harry
stimmt nicht, wollte die antwort nur einfach halten.
liebe grüße,
harry
Anzeige

303 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige