Thema Datum  Von Nutzer Rating
Antwort
Rot 2 Spalten in 1 Spalte kopieren VBA
 10.09.2015 12:02:24 Timmy
NotSolved
10.09.2015 14:01:21 BigBen
Solved
10.09.2015 15:59:10 Timmy
NotSolved

Ansicht des Beitrags:
Von:
Timmy		 Datum:
10.09.2015 12:02:24		 Views:
1165		 Rating:
     
Antwort:
  Ja
Thema:
2 Spalten in 1 Spalte kopieren VBA

Hallo,

ich möchte die Inhalte von Spalte B (Nachname) unter den Inhalt von Spalte A (Vorname) kopieren. Meine Tabelle ist wie folgt aufgebaut:

 

Spalte A   | Spalte B

---------------------------

     A           |          1

     B           |          2 

     C           |          3

 

Mein Code hierzu:

     
Sub EineSpalte()

    Dim EineSpalte As Range
        For Each EineSpalte In ActiveSheet.UsedRange.Columns
        EineSpalte.SpecialCells(xlCellTypeConstants).Copy Sheets("Tabelle1").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0)
    Next

End Sub

 

Es wird der Inhalt von Spalte B in Spalte A kopiert, allerdings wird der Inhalt von Spalte A (A B C) nochmals kopiert.Das Ergebnis sieht also so aus:

     A          

     B        

     C

     A          

     B        

     C           

     1

     2

     3

 

Sollte aber so aussehen:

     A          

     B        

     C           

     1

     2

     3          

 

Kann mir bei meinem Problem jemand weiterhelfen? Über Hilfestellungen würde ich mich sehr freuen!

 

 

Guß

Timmy

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 2 Spalten in 1 Spalte kopieren VBA
 10.09.2015 12:02:24 Timmy
NotSolved
10.09.2015 14:01:21 BigBen
Solved
10.09.2015 15:59:10 Timmy
NotSolved