2014-10-16 4 views
0

데이터 테이블이 있으며 x 값으로 테이블의 값을 오프셋하는 매크로를 만들려고합니다. 각 x 값을 빠르게 더하거나 뺄 수있는 방법이 있는지 궁금합니다. 세포. 나는 셀을 더하거나 뺄 때 매크로를 만들 수 있지만 시간이 많이 걸릴 것이라고 생각합니다. 도와 주셔서 감사합니다!VBA를 사용하여 테이블 값을 오프셋하는 방법

+0

여기에있는 일반적인 정책은 귀하를 대신하여 이루어진 몇 가지 노력을 입증하는 것입니다. 그렇지 않은 경우 사람들을 대신하여 귀하의 작업을 수행 할 사람을 찾습니다. 나는 당신이 매크로 기록을 시도 할 것을 제안한다. 이것은 당신이 얼마나 빨리 그리고 쉽게 시작할 수 있는지에 대해 알게 할 것이다. 커뮤니티는 특정 목표를 마무리하는 데 도움을 줄 것입니다.하지만 먼저 이러한 조치를 취해야합니다. 이 경우 커뮤니티가 훨씬 도움이 될 것입니다. –

답변

0

예, 특수 붙여 넣기를 사용하십시오. A10 테이블을 포함

Sub test() 
    With Sheets("Sheet1") 
     Dim x As Long: x = 1 
     .Range("B1") = x: .Range("B1").Copy '~~> any anchor cell 
     .Range("A1:A10").PasteSpecial , xlPasteSpecialOperationAdd 
     .Range("B1").ClearContents 
    End With 
    Application.CutCopyMode = False 
End Sub 

그래서 위의 A1이 있다고 가정합니다. HTH.

관련 문제