我正在尋找一位 Excel 專家,但我所要求的可能是不可能的。最初,我正在尋找一個宏,允許我在執行插入複製單元格並向下移動後貼上值。我終於向 ChatGPT 提出了正確的問題,並且能夠讓它吐出一個有效的成功宏,僅供參考:
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
然而,我現在意識到我仍然需要一些單元格來保留其定價公式,例如。我附上了一個零件的圖片,例如下面的。標題突出顯示了這一點:標準魔杖。我需要採用盒裝輪廓,僅貼上 A 列到 E 列的值。
重點是我想獲取這些數據並將其粘貼到另一張紙中,其中商品的描述將根據零件編號進行更新,但成本計算將保留一個公式,請參閱帶有標題的附圖:商品、數量、零件編號、說明等