Hvordan tegne X-linjer i VBA Excel

Visual Basic for Applications hjelper deg med å formatere, vise, analysere og manipulere data i Excel. VBA kan bruke kode du skriver til å automatisk utføre repeterende oppgaver som ville være vanskelig eller umulig å gjøre manuelt, inkludert flere matematiske operasjoner på tusenvis av kolonner i forskjellige arbeidsbøker. En Excel-regnearkfunksjon lar celler ha grenser representert ved rette linjer eller diagonaler, som du kan bruke til å tegne X-linjer inne i cellene.

VBA Grunnleggende

I Excel er regneark, celler og celledeler kjent som "objekter", og har egenskaper du kan manipulere, for eksempel farge. VBA-koden som gjør objekter utfører oppgaver kalles en makro, og den er skrevet ved hjelp av Visual Basic-redigeringsverktøyet som finnes under utviklerfliken, under "File", velger "Options" og "Excel Options." På venstre side av dialogboksen, må du velge "Tilpass bånd", "Kommandoer" og deretter "Populære kommandoer." Etter at du har valgt "Tilpass båndet" og "Hoved", og velg Utvikler-avmerkingsboksen og klikk "OK", vises fanen Utvikler. En makro begynner med "sub", som er kort for subrutinen, og slutter med "sluttdel." Du må lagre den med en .xlsm-utvidelse.

VBA kommandoer

Kommandoformatet innebærer å skrive objektet og dets egenskap eller metode, skilt med en prikk. Range-objektet brukes med "Selection" og "Select" for å klargjøre en celle eller gruppe av celler for drift. For eksempel velger kommandoen "Range (" A1 "). Value = 3" celle 1 og tildeler den en verdi på 3. For å velge celler A6 og C6 og alt i mellom vil du skrive "Range (" A6: C6 ").Å velge."

Border Properties

Grenser kan bruke tykke eller tynne faste eller stiplede linjer, i svart som standard. En diagonal linje er en innvendig kant, går bakover eller fremover, der kommandoen er henholdsvis "xlDiagonalDown" eller "xlDiagonalUp". Kommandoen for å tegne frem og tilbake diagonale skråstreker er "Selection.Borders (Diagonal Command) .LineStyle = xlContinuous", der xlContinuous betyr faste linjer.

Tegning X linjer

For å tegne X-linjer må du opprette diagonale skråstreker frem og tilbake i hver celle av interesse. Du kan øve å tegne dem i tre celler ved å åpne skriptvinduet, starte og navngi en ny under, og deretter skrive inn et skript for å velge celler hvor X-linjene skal tegnes, for eksempel "Sub drawDiagonal ()" på en linje og "Range (" A6: C6 "). Velg" under det. For å instruere skriptet å tegne frem og tilbake skråstreker i hvert av de valgte cellene, må du skrive "Selection.Borders (xlDiagonalDown) .LineStyle = xlContinuous" og "Selection.Borders (xlDiagonalUp) .LineStyle = xlContinuous" under det. Ved å skrive "End Sub" lukkes underrutinen. Etter å ha klikket på "Makroer" på Utviklerens kategori og deretter "Kjør", vises X-linjene i celler A6, B6 og C6.