Thema Datum  Von Nutzer Rating
Antwort
16.09.2011 11:55:47 Nico Schulz
NotSolved
16.09.2011 14:33:53 Gast93970
NotSolved
19.09.2011 08:34:25 Nico Schulz
NotSolved
Blau Copy Range If - Bedingtes kopieren
 19.09.2011 01:17:09 till
NotSolved
19.09.2011 08:45:31 Nico Schulz
NotSolved
21.09.2011 00:01:50 Till
NotSolved
21.09.2011 00:04:24 till
NotSolved
21.09.2011 07:25:32 Nico Schulz
Solved
21.09.2011 08:56:35 Till
NotSolved
21.09.2011 08:59:04 Nico Schulz
Solved

Ansicht des Beitrags:
Von:
till		 Datum:
19.09.2011 01:17:09		 Views:
1137		 Rating:
     
Antwort:
  Ja
Thema:
Copy Range If - Bedingtes kopieren

Der Code ergibt für mich nicht wirklich Sinn. Willst du eine Zeile in ein anderes Tabellenblatt kopieren wenn in der Haupt Tabelle in der Zelle H der Zeile "i.O" steht?

Also eine art Filter?

Das müsste so gehen:

with sheets(6)
set rng=.range("H1:h2500")
Zeile=70
for z = zeile to 2500

if rng("H" & Z)="i.O" then
.range("A" & z & ":" & "G" & Z).copy
.range("BJ" & 70 + r).pastespecial
r=r+1
end if

next
end with

 

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
16.09.2011 11:55:47 Nico Schulz
NotSolved
16.09.2011 14:33:53 Gast93970
NotSolved
19.09.2011 08:34:25 Nico Schulz
NotSolved
Blau Copy Range If - Bedingtes kopieren
 19.09.2011 01:17:09 till
NotSolved
19.09.2011 08:45:31 Nico Schulz
NotSolved
21.09.2011 00:01:50 Till
NotSolved
21.09.2011 00:04:24 till
NotSolved
21.09.2011 07:25:32 Nico Schulz
Solved
21.09.2011 08:56:35 Till
NotSolved
21.09.2011 08:59:04 Nico Schulz
Solved