엑셀 VBA 매크로의 다음

Question

내가 프로그래밍의 경험이없는 경우 사용,하지만 난 다음을 수행 매크로 기록 : 그것은 다른 시트의 테이블에 선택한 셀에서 값을 이동 활성화되면

Range("B8").Select 
    Selection.Copy 
    Sheets("DataRaw").Select 
    Range("Table3[[#Headers],[Datum]]").Select 
    Selection.End(xlDown).Select 
    ActiveCell.Offset(1, 0).Range("A1").Select 
    Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _ 
     False, Transpose:=False 
    ActiveCell.Offset(0, 1).Range("A1").Select 
    Sheets("Transactie").Select 
    Range("C8").Select 
    Application.CutCopyMode = False 
    Selection.Copy 
    Sheets("DataRaw").Select 
    Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _ 
     False, Transpose:=False 
    ActiveCell.Offset(0, 1).Range("A1").Select 
    Sheets("Transactie").Select 
    Range("D8").Select 
    Application.CutCopyMode = False 
    Selection.Copy 
    Sheets("DataRaw").Select 
    Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _ 
     False, Transpose:=False 
    ActiveCell.Offset(0, 2).Range("A1").Select 
    Sheets("Transactie").Select 
    Range("D8").Select 
    Application.CutCopyMode = False 
    Selection.ClearContents 
    Range("C8").Select 
    Selection.ClearContents 
    Range("B8").Select 
    Selection.ClearContents 

합니다. 내가 원하는 것은 서로 다른 카테고리의 여러 테이블을 가질 수 있어야하고 코드가 입력이 속한 카테고리를 인식하도록하여 해당 값을 해당 테이블로 이동할 수있게하는 것입니다.

과일 이름을 입력하면 모든 값이 fruits 테이블로 이동하고 야채 이름이 있으면 모든 값이 채소 테이블로 이동합니다. 내가 사용하는 경우 추측, 다음 진술하지만 난 그냥 어떻게 몰라 :

희망 내 질문은 분명하다. 고마워요!

Answer 1

If-Then 및 VBA는 질문이 제기 될 때 시도하는 것에 지나치게 복잡해 보입니다. 피벗 테이블을 살펴 보는 것이 좋습니다. 여기에 당신이 시작하는 두 개의 링크입니다 : - 인형 를 들어 http://www.dummies.com/how-to/content/the-essentials-of-excel-2010-pivot-tables-and-pivo.html

을 만들기 또는 피벗 테이블 또는 피벗 차트 보고서 삭제 - 엑셀 -

엑셀의 Essentials 2010에서 피벗 테이블 및 피벗 차트를 Office.com을 http://office.microsoft.com/en-us/excel-help/create-or-delete-a-pivottable-or-pivotchart-report-HP010089893.aspx