2017-11-28 1 views
0

Ich versuche, eine Excel-Makro-VBA zu erstellen, um einige spezifische Zelle (F4, H4, H5, H6, H7, F8, H8, F9, H9, H14) Wert zu löschen und zuzuweisen das gleiche Makro zum Knopf. Aber es funktioniert nicht. Könnte jemand bitte helfen, indem er Makro korrigiert.Excel VBA Makros zum Löschen von Daten mit bestimmten Zelle

Sub Clear() 
    Range("F4,H4,H5,H6,H7,F8,H8,F9,H9,H14").Clear 
End Sub 

Grüße RKP

+3

sicherstellen, dass Sie das Arbeitsblatt Bereich zuweisen. 'Arbeitsblatt (" Sheet1 "). Bereich (" F4, H4, H5, H6, H7, F8, H8, F9, H9, H14 "). Löschen" –

+0

Funktioniert gut für mich, was ist das Problem, das Sie haben? Scott Craner hat allerdings Recht. Sie sollten es einem Arbeitsblatt zuweisen; ansonsten wird es auf 'ActiveSheet' funktionieren. – Maldred

+0

Welche Art von Button benutzen Sie, wenn Sie eine Form-Schaltfläche benutzen, doppelklicken Sie auf den Button im Design-Modus und kopieren Sie entweder Ihren Code unter diese Subroutine oder geben Sie einfach den Namen Ihres Makros ein Wenn die Schaltfläche geklickt wird, wird das Makro aufgerufen ... – Xabier

Antwort

0

Vielen Dank an alle für mich mit dem Code zu helfen. Unten ist der Arbeitscode.

Sub ClearContent()

Range("H5:I5").Select 
Selection.ClearContents 

Range("F7:I7").Select 
Selection.ClearContents 

Range("F8").Select 
Selection.ClearContents 

Range("H8:I8").Select 
Selection.ClearContents 

Range("H9:I9").Select 
Selection.ClearContents 

Range("F14:I14").Select 
Selection.ClearContents 

Range("F15:I15").Select 
Selection.ClearContents 

End Sub

Verwandte Themen