Thema Datum  Von Nutzer Rating
Antwort
17.07.2015 12:35:07 Silke Martin
NotSolved
Blau Macro gibt falsche Zelle aus Range.(von:bis).Selection
 22.07.2015 23:02:06 BigBen
NotSolved

Ansicht des Beitrags:
Von:
BigBen		 Datum:
22.07.2015 23:02:06		 Views:
619		 Rating:
     
Antwort:
  Ja
Thema:
Macro gibt falsche Zelle aus Range.(von:bis).Selection

Hallo,

das ist ganz einfach:

man braucht nur einen Befehl ausführen:

    rngSource.Copy Destination:=rngDestination
 
Beispiel:
 
Sub TestCopy()
    Dim rngSrc As Range
    Dim shsrc As Worksheet
    Set shsrc = ActiveWorkbook.Sheets("Tabelle1")
    Set rngSrc = shsrc.Range("A1:B1")
    
    Dim rngDest As Range
    Dim shDest As Worksheet
    Set shDest = ActiveWorkbook.Sheets("Tabelle2")
    Set rngDest = shDest.Range("C1:D1")
    rngSrc.Copy rngDest
    
    ' Kopiere eine weiteren Bereich:
    Set rngSrc = shsrc.Range("G1:H1")
    
    Set rngDest = shDest.Range("C2:D2")
    rngSrc.Copy rngDest
End Sub
 
Im Beispiel wird innerhalb einer Datei ein Wert von einer Tabelle zur anderen Tabelle kopiert. Nach dem gleichen Verfahren funktioniert auch das Kopieren von einer Datei in eine andere.
 
Die ganzen "select"-Befehle werden in der Regel nicht benötigt.
 
VG, BigBen

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
17.07.2015 12:35:07 Silke Martin
NotSolved
Blau Macro gibt falsche Zelle aus Range.(von:bis).Selection
 22.07.2015 23:02:06 BigBen
NotSolved