Hoe inhoud en opmaak tegelijkertijd in cellen in Excel wissen?
Normaal gesproken kunt u de inhoud van geselecteerde cellen verwijderen door op de Delete-toets op het toetsenbord te drukken. Maar hoe wist u ook de celopmaak bij het verwijderen van de inhoud? Dit artikel introduceert een VBA-methode waarmee u dit probleem kunt oplossen.
Wis inhoud en opmaak tegelijkertijd in cellen met VBA-code
Wis inhoud en opmaak tegelijkertijd in cellen met VBA-code
De onderstaande VBA-code kan u helpen de celinhoud en opmaak tegelijkertijd te wissen, doe dit als volgt.
1. In het werkblad waarvan u de inhoud en opmaak uit cellen wilt wissen, drukt u op anders + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.
2. In de Microsoft Visual Basic voor toepassingen venster klikt Invoegen > Module. Kopieer en plak vervolgens VBA-code in het codevenster.
VBA-code: inhoud en opmaak tegelijkertijd in cellen wissen
Sub sbClearCellsOnlyData()
Dim xRg As Range
On Error Resume Next
Set xRg = Application.InputBox("Please select cell(s):", "KuTools For Excel", Selection.Address, , , , , 8)
If xRg Is Nothing Then Exit Sub
Application.ScreenUpdating = False
xRg.Clear
Application.ScreenUpdating = True
End Sub
3. In het opduiken Kutools for Excel dialoogvenster, selecteer de cellen waarvan u de inhoud en de opmaak tegelijkertijd wilt wissen en klik vervolgens op OK knop. Zie screenshot:
Vervolgens kunt u zien dat de inhoud en opmaak van geselecteerde cellen onmiddellijk worden gewist, zoals hieronder wordt getoond.
Gerelateerde artikelen:
- Hoe de inhoud van de keuzelijst met invoervak met VBA-code in Excel te wissen?
- Hoe de inhoud van het benoemde bereik in Excel te wissen?
- Hoe beperkte waarden in cellen in Excel te wissen?
- Hoe de gespecificeerde celinhoud wissen als de waarde van een andere cel in Excel verandert?
- Hoe de gespecificeerde celinhoud wissen bij openen en afsluiten in Excel-werkmap?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!