Thema Datum  Von Nutzer Rating
Antwort
27.08.2021 00:03:10 Gerrit
Solved
Blau Zellen kopieren mit Array + Schleife
27.08.2021 03:20:33 Gast43093
Solved
27.08.2021 18:07:39 Gerrit
NotSolved

Ansicht des Beitrags:
Von:
Gast43093
Datum:
27.08.2021 03:20:33
Views:
479
Rating: Antwort:
 Nein
Thema:
Zellen kopieren mit Array + Schleife

Der Mensch muss etwas markieren / auswählen, damit die Maschine versteht worauf er sich bezieht. Dafür ist dieses Select da - für den Mensch vor dem PC.

Ein Makro ist darauf jedoch nicht angewiesen. Im Makro kann man ganz genau angeben worauf man sich bezieht, ohne es irgendwie markieren zu müssen.

Beispiel:

Option Explicit

Sub Test()
  
  Dim rngCell As Excel.Range
  
  Set rngCell = Worksheets("01").Columns("C") _
                  .Find( _
                      What:="Peter", _
                      LookIn:=xlValues, _
                      LookAt:=xlWhole, _
                      SearchOrder:=xlByColumns, _
                      MatchCase:=False)
  
  If Not rngCell Is Nothing Then
    Worksheets("Auswertung").Range("B3:G3").Value = rngCell.Offset(0, 18).Value
  End If
  
End Sub

 

Grüße

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
27.08.2021 00:03:10 Gerrit
Solved
Blau Zellen kopieren mit Array + Schleife
27.08.2021 03:20:33 Gast43093
Solved
27.08.2021 18:07:39 Gerrit
NotSolved