Thema Datum  Von Nutzer Rating
Antwort
Rot Markierte Zeile nur mit Formeln kopieren und darüber einfügen
14.06.2022 13:19:19 Max
NotSolved
14.06.2022 13:37:49 Gast62626
NotSolved

Ansicht des Beitrags:
Von:
Max
Datum:
14.06.2022 13:19:19
Views:
117
Rating: Antwort:
  Ja
Thema:
Markierte Zeile nur mit Formeln kopieren und darüber einfügen

Servus zusammen,

ich möchte folgendes mit einem Klick auf eine Schaltfläche erreichen:

  1. Bestimmte Sheets auswählen (funktioniert)
  2. Zeile in der die ausgewählte Zelle liegt markieren (funktioniert)
  3. Formeln in der markierten Zeile markieren (bis jetzt kann ich nur alle Werte in der Zeile kopieren und nicht nur die Formeln)
  4. Kopierte Zeile über der markierten Zeile einfügen (funktioniert)

Mein problem ist also aktuell, dass ich nicht nur die Formeln, sondern alle Zahlen aus der markierten Zeile kopiere und so eben auch in die neu eingefügte Zeile übertrage. So muss ich im Nachgang alle Zellen mit Zahlenwerten (ohne Formel) per Hand löschen.

Wäre weltklasse, wenn mir da jemand helfen könnte!

Aktuell sieht der Code so aus:

Sub SchaltflächeZeileNEU_Klicken()

Dim Adresse As String

Application.ScreenUpdating = False

Sheets(Array(6, 7, 8, 9, 10, 11)).Select                                'Vorgesehene Arbeitsblätter auswählen
ActiveCell.EntireRow.Select                                             'Zeile in der die ausgewählte Zelle liegt markieren
Selection.Copy                                                          'Ausgewählte Zeile kopieren
Selection.Insert Shift:=x1Down                                          'Kopierte Zeile über der ausgewählten Zeile einfügen
Sheets("Deckblatt").Select                                              'Deckblatt anzeigen
Application.ScreenUpdating = True


End Sub

 


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 Markierte Zeile nur mit Formeln kopieren und darüber einfügen
14.06.2022 13:19:19 Max
NotSolved
14.06.2022 13:37:49 Gast62626
NotSolved