Endre størrelse Avkrysnings

December 31  by Eliza

Når du arbeider i VBA, er en av de tingene du kan opprette kjent som en "brukerskjema." Disse skjemaene gir deg muligheten til å hovedsaklig lage dine egne dialogbokser. Du kan legge til mange ulike typer kontroller til en bruker skjema, hvis ønskelig. For eksempel kan du legge til etiketter, tekstbokser, rullegardinlister, radioknapper, og mange andre kontroller. Noen av kontrollene du kan endre størrelse; andre kan du ikke. En som du ikke kan endre størrelsen er en sjekkheftet. Mens du kan endre skriftstørrelsen som brukes for etiketten ved siden av boksen, kan du ikke endre størrelsen på avkrysnings selv.

Hvis du finner avmerkingsboksene i bruker former for liten for din smak, kan du "omgå" dem ved å simulere en sjekkheftet. Du gjør dette ved å faktisk lage en etikett i stedet for en sjekkheftet. Deretter kan endre egenskapene til etiketten, slik at det har en gjennomsiktig bakgrunn, og at skriften blir brukt er Wingdings. Du bør også sørge for at skriften er satt til en stor størrelse, for eksempel 20 eller 26 poeng.

Nå, dobbeltklikker du på etiketten, som skal åpne en kode vindu. Hendelsen som du programmerer er Click-hendelsen for etiketten, som betyr at det vil bli utført når etiketten er klikket. Bruke dette som koden din:

Private Sub Label1_Click ()
Hvis Label1.Caption = Chr (254) Deretter
Label1.Caption = Chr (168)
Else
Label1.Caption = Chr (254)
End If
End Sub

I Wingding font, Chr (254) er boks med en hake, og Chr (168) er en boks uten hake. Når du utfører bruker skjemaet og klikk på etiketten, skifter det mellom en tom boks og en merket boks. Du kan også legge til annen kode til Click-hendelsen som utfører andre oppgaver etter behov.

ExcelTips er din kilde for kostnadseffektiv Microsoft Excel trening. Dette tipset (8566) gjelder for Microsoft Excel 2007 og 2010. Du kan finne en versjon av dette tipset for den eldre menygrensesnittet av Excel her: Endre størrelse avmerkingsboksene.