Ich suche hier einen Excel-Experten und meine Frage ist möglicherweise nicht möglich. Ursprünglich suchte ich nach einem Makro, mit dem ich Werte einfügen kann, nachdem ich kopierte Zellen eingefügt und nach unten verschoben habe. Ich habe ChatGPT schließlich die richtige Frage gestellt und konnte es dazu bringen, ein erfolgreiches Makro auszuspucken, das funktioniert, zu Ihrer Information:
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Application.ScreenUpdating = False
Application.EnableEvents = False
If Not Intersect(Target, Sh.Cells) Is Nothing Then
If Application.CutCopyMode = xlCopy Then
If Target.PasteSpecial(Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False) Then
Application.CutCopyMode = False
End If
End If
End If
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub
Jetzt merke ich jedoch, dass ich in einigen Zellen noch die Formeln für die Preisgestaltung benötige. Ich habe unten beispielsweise ein Bild eines Teils angehängt. Dies wird durch die Überschrift hervorgehoben: Standardstäbe. Ich muss die eingerahmte Umrisslinie nehmen und nur die Werte von Spalte A bis E einfügen. Ich brauche die Spalten F bis I, um das Einfügen in Formeln beizubehalten, nicht in Werte.
Der Punkt ist, dass ich diese Daten nehmen und sie in ein anderes Blatt einfügen möchte, wo die Beschreibung des Artikels basierend auf der Teilenummer aktualisiert wird, die Kosten jedoch eine Formel bleiben, siehe beigefügtes Bild mit den Überschriften: Artikel, Menge, Teilenummer, Beschreibung usw.