Thema Datum  Von Nutzer Rating
Antwort
12.04.2012 18:48:20 Tim
Solved
Blau Spalten-Inhalte Kopieren
 12.04.2012 20:10:26 Messiah
NotSolved
12.04.2012 20:23:01 Tim
NotSolved
12.04.2012 21:48:41 Gast88351
NotSolved
15.04.2012 21:46:17 Tim
NotSolved

Ansicht des Beitrags:
Von:
Messiah		 Datum:
12.04.2012 20:10:26		 Views:
1074		 Rating:
     
Antwort:
  Ja
Thema:
Spalten-Inhalte Kopieren

Hallo,

ich habe den Code mal ein bischen umgeschrieben. Meiner Meinung nach ist es jetzt schneller. Es wird immer bis zur letzten beschriebenen Zeile "kopiert".

Sub Kopieren()

Dim spalte As Long

For spalte = 10 To 93

If Cells(2, spalte).Value <> "" Then
Range(Cells(1, spalte), Cells(10000, spalte).End(xlUp)).Select
For Each cell In Selection
cell.Value = cell.Value
Next

End If

Next spalte

End Sub

Ich hoffe ich konnte weiterhelfen...

 

Man könnte es auch automatisch starten lassen. Das heißt der Code wird immer dann ausgeführt, wenn in Zeile 2 eine eintragung erfolgt egal in welcher Spalte.

Einfach nochmal schreiben.

 

Gruß Messiah

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
12.04.2012 18:48:20 Tim
Solved
Blau Spalten-Inhalte Kopieren
 12.04.2012 20:10:26 Messiah
NotSolved
12.04.2012 20:23:01 Tim
NotSolved
12.04.2012 21:48:41 Gast88351
NotSolved
15.04.2012 21:46:17 Tim
NotSolved