Thema Datum  Von Nutzer Rating
Antwort
Rot If Ja, Zellen kopieren
 05.10.2020 14:26:21 Karl
NotSolved
05.10.2020 15:06:58 Gast3815
NotSolved
05.10.2020 15:18:43 Karl
NotSolved
05.10.2020 15:11:12 Karl
NotSolved
05.10.2020 15:35:05 Gast54649
Solved
05.10.2020 16:03:32 Karl
NotSolved
05.10.2020 15:40:00 Gast61720
***
NotSolved
05.10.2020 16:04:10 Karl
NotSolved
05.10.2020 16:18:16 Gast92922
NotSolved

Ansicht des Beitrags:
Von:
Karl		 Datum:
05.10.2020 14:26:21		 Views:
771		 Rating:
     
Antwort:
  Ja
Thema:
If Ja, Zellen kopieren

Hallo,

leider habe ich diverse Varianten ausprobiert aber leider keine Lösung gefunden.

Tabelle 1 Zellen B5 bis R5 sollen nach Tabelle 2 Zelle M3 kopiert werden wenn Tabelle 2 Zelle G3=x

Sub IF()

Dim lnfZeile As Long
For lnfZeile = 2 To 459
If Worksheets("Tabelle2").Cells(lnfZeile, "G").Value = "x" Then
Worksheets("Tabelle2").Cells(lnfZeile, "M").Copy  Worksheets("Tabelle").Cells("B5:R5")
Else: Worksheets("'Tabelle2").Cells(lneZeile, "G").Value = ""
End If
Next


End Sub

Danke für die Hilfe

Grüße

Karl

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
Rot If Ja, Zellen kopieren
 05.10.2020 14:26:21 Karl
NotSolved
05.10.2020 15:06:58 Gast3815
NotSolved
05.10.2020 15:18:43 Karl
NotSolved
05.10.2020 15:11:12 Karl
NotSolved
05.10.2020 15:35:05 Gast54649
Solved
05.10.2020 16:03:32 Karl
NotSolved
05.10.2020 15:40:00 Gast61720
***
NotSolved
05.10.2020 16:04:10 Karl
NotSolved
05.10.2020 16:18:16 Gast92922
NotSolved