Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Name in Spalte suchen und in dieser Zeile Range kopieren

Forumthread: Name in Spalte suchen und in dieser Zeile Range kopieren

Name in Spalte suchen und in dieser Zeile Range kopieren
15.03.2024 11:58:25
Bernhard
hallo

hab diesen code und er soll mir nicht die ganze Zeile kopieren , sondern nur von H bis NI....
bekomme es nicht hin, kann mir jemand helfen?
Danke

Sub Name()
Dim SZelle As Range
Dim Suchwert As String

Suchwert = "Name" 'Suchbegriff

Set SZelle = Tabelle5.Range("A:A").Find(Suchwert)
Rows(SZelle.Row).Copy
ActiveCell.Offset(0, 9).PasteSpecial Paste:=xlPasteValues, _
Operation:=xlNone, _
SkipBlanks:=False, _
Transpose:=False

End Sub
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Name in Spalte suchen und in dieser Zeile Range kopieren
15.03.2024 12:11:37
ralf_b
Gibts du den Namen jedesmal von Hand im Code ein?

Sub Name()

Dim SZelle As Range
Dim Suchwert As String

Suchwert = "Name" 'Suchbegriff

Set SZelle = Tabelle5.Range("A:A").Find(Suchwert)
If Not SZelle Is Nothing Then
Tabelle5.Range("H" & SZelle.Row & ":NI" & SZelle.Row).Copy
ActiveCell.Offset(0, 9).PasteSpecial Paste:=xlPasteValues, _
Operation:=xlNone, _
SkipBlanks:=False, _
Transpose:=False
Else
MsgBox "Nicht gefunden: " & Suchwert
End If
End Sub
Anzeige
AW: Name in Spalte suchen und in dieser Zeile Range kopieren
15.03.2024 12:42:40
Bernhard Grandl
Hallo
Nein ich starte dieses Makro mit einem Doppelklick in dem dieser Name steht.

Für jeden Namen hab ich dann ein seperates makro.
Lg
AW: Name in Spalte suchen und in dieser Zeile Range kopieren
15.03.2024 13:32:16
ralf_b
vielleicht macht das die anderen Makros überflüssig.
Suchwert = Activecell.value

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige