Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
468to472
468to472
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Find-Methode

Forumthread: Find-Methode

Find-Methode
11.08.2004 13:43:43
Andreas
Hallo zusammen,
ich möchte in einer Tabelle nach dem Anzeigen der Teilergebnisse, unter jedem Teilergebnis eine Leerzeile einfügen. Da dies mit normaler Excel-Funktionalität nicht funktioniert, dachte ich es könnte es mit VBA versuchen.
Mein Anfang war
Dim Search As Range, SearchNeu As Range
Set Search = Range("A1:X1000").Find("TEILERGEBNIS", LookIn:=xlFormulas, lookat:=xlPart)
If Not Search Is Nothing Then SearchNeu = Search.Offset(1, 0)
Er findet aber nichts. Wer kann mir hefen?
Gruss Andreas Bachmann
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Find-Methode
11.08.2004 14:24:38
Andreas
Hallo Boris,
danke für die schnelle Antwort:
Nur mir dem Hinweis, ich solle das Coding ins englische übersetzen komme ich nicht weiter
Was ist hieran nicht englisch?

Sub Makro2()
Dim Search As Range
Range("A1").Select
Search = Cells.Find(What:="=TEILERGEBNIS", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False)
End Sub

Gruss Andreas
Anzeige
AW: Find-Methode
Boris
Hi Andreas,
Was ist hieran nicht englisch?
Dann schau doch nochmal genau hin - ist genau EIN Wort...;-)
Grüße Boris
AW: Find-Methode
11.08.2004 16:39:39
Andreas
Hallo Boris,
mit Cells.Find(What:="=SUBTOTAL", ... funktioniert es wunderbar
Gruss Andreas Bachmann
Sag ich ja...;-)) oT
Boris
Grüße Boris
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige