Het is belangrijk om in gedachten te houden dat niet alle functies in een Excel-spreadsheet kan worden gebruikt in Visual Basic voor toepassingen . Echter , kan de functie " ISLEEG " zowel gebruikt worden als een formule in een spreadsheet en in VBA om hetzelfde doel te dienen - dat is te controleren of een cel leeg is . Deze functie wordt vaak gebruikt in een lus om door een kolom of rij cellen tot je bij een lege cel . Instructies
1 Klik op het tabblad " Developer " en klik op " Visual Basic " om het venster VB editor te openen . Klik op het menu "Invoegen " en klik op "Module " om een nieuwe module te voegen kopen van 2 Maak een sub procedure door toevoeging van de volgende code : . Private Sub checkForBlankCell
( ) < br >
3 Maak een Integer variabele en geef het een waarde van 1 : Dim X
als Geheel
X = 1
4 gegevens toe aan de eerste tien rijen van A1 : . Range
( " A1 " ) Selecteer
ActiveCell.FormulaR1C1 = " 1 "
Range ( " A2 " . ) Selecteer
ActiveCell.FormulaR1C1 = " 2 " Range
( " A1 : A2 " . ) Selecteer Selection.AutoFill Bestemming
: = Range ( " A1 : A10 " ) , Type : = xlFillDefault Range
( " A1 : " . ) Selecteer Range
( " . A10 A1 " ) Selecteer
5 Maak een lus en controleer of de cel leeg is door gebruik te maken van de " IsEmpty " celfunctie en geven elke cel waarde door het venster Direct :
Doe tot IsEmpty ( ActiveCell.Value ) Range
( " A " en X ) . Selecteer Debug.Print
X = X + 1
Loop
End 6 van de procedure ( ActiveCell.Value ) door te typen " End Sub " en druk op " Ctrl " en " G " om het venster Direct weer te geven . Klik op " F5 " om de procedure uit te voeren.
|
