Thema Datum  Von Nutzer Rating
Antwort
Rot Kopieren und einfügen
 12.08.2019 17:55:21 Stefsn
Solved
12.08.2019 20:09:18 Gast87287
*****
NotSolved
13.08.2019 08:57:37 Gast306
NotSolved

Ansicht des Beitrags:
Von:
Stefsn		 Datum:
12.08.2019 17:55:21		 Views:
1138		 Rating:
     
Antwort:
 Nein
Thema:
Kopieren und einfügen

Moin zusammen, 

ich möchte folgende Sache machen. Ich möchte die Zellen L3 - O3 vom Blatt A durch Knopfdruck in Blatt B, Spalte B - E kopieren, undzwar unter die letztbeschriebene Zeile. Im gleichen Atemzug soll in der Spalte A in Blatt B in der zugehörigen Spalte A der neuen Zeile eine ID um eins erhöht werden. Achja, die Zellen L3 - O3 haben ein Zahlenformat, was ich gerne mitkopieren möchte ABER die restliche Formatierung soll nicht übernommen werden (Linien und Füllfarben). 

Mein erster Ansatz ist folgender: 

Sub Kopieren2()
    Sheets("Prüfen").Range("L3:O3").Copy Destination:=Sheets("Aktueller bestand").Cells(Sheets("Aktueller Bestand").Rows.Count, 2).End(xlUp).Offset(1, 0)
End Sub
 
Der kopiert aber alle Formatierung und erhöht die laufende ID nicht. 
 
Und eine zweite Frage:
 
Der Befehl soll ausgelöst werden in:
 
Private Sub CommandButton3_Click()
      ...
End Sub
 
Wie kann ich die Sub Kopieren2() in dem Button integriere, als Funktion?

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 Kopieren und einfügen
 12.08.2019 17:55:21 Stefsn
Solved
12.08.2019 20:09:18 Gast87287
*****
NotSolved
13.08.2019 08:57:37 Gast306
NotSolved