Hur man ritar X-linjer i VBA Excel

Visual Basic for Applications hjälper dig att formatera, visa, analysera och manipulera data i Excel. VBA kan använda kod du skriver för att automatiskt utföra repeterande uppgifter som skulle vara svåra eller omöjliga att göra manuellt, inklusive flera matematiska operationer på tusentals kolumner i olika arbetsböcker. En Excel-kalkylarkfunktion tillåter att celler har gränser som representeras av raka linjer eller diagonaler, som du kan använda för att rita X-linjer inuti cellerna.

VBA Basics

I Excel är kalkylblad, celler och cellintervall kända som "objekt" och har egenskaper du kan manipulera, till exempel färg. VBA-koden som gör objekt att utföra uppgifter kallas ett makro, och det är skrivet med hjälp av Visual Basic-redigeraren som finns under utvecklarfliken, under "Arkiv", välj "Alternativ" och "Excel-alternativ". Till vänster om dialogrutan, måste du välja "Anpassa band", "Kommandon" och sedan "Populära kommandon". När du har valt "Anpassa bandet" och "Huvud" och välj Utvecklarens kryssrutan och klicka på "OK" visas fliken Utvecklare. Ett makro börjar med "sub", som är kort för subrutinen, och slutar med "slutdel". Du måste spara det med en .xlsm-förlängning.

VBA-kommandon

Kommandotypen innefattar att skriva objektet och dess egenskap eller metod, åtskilda med en punkt. Range-objektet används med "Selection" och "Select" för att klara en cell eller en grupp av celler för drift. Kommandot "Range (" A1 "). Value = 3" väljer sedan cell 1 och tilldelar det ett värde av 3. För att välja celler A6 och C6 och allt däremellan skulle du skriva "Range (" A6: C6 ").Välj."

Border Properties

Gränser kan använda tjocka eller tunna fasta eller streckade linjer, i svart som standard. En diagonal linje är en inre kant, går bakåt eller framåt, där kommandot är "xlDiagonalDown" respektive "xlDiagonalUp". Kommandot att dra fram och bakåt diagonala snedstreck är "Selection.Borders (Diagonal Command) .LineStyle = xlContinuous", där xlContinuous betyder solida linjer.

Ritning X-linjer

För att rita X-linjer måste du skapa diagonala snedstreck framåt och bakåt i varje cell av intresse. Du kan öva att dra dem i tre celler genom att öppna skriptfönstret, starta och namnge en ny del och sedan skriva in ett skript för att välja de celler där X-linjerna kommer att ritas, t.ex. "Sub drawDiagonal ()" på en rad och "Range (" A6: C6 "). Välj" under den. För att instruera skriptet att dra fram och bakåt snedstreck i vart och ett av de valda cellerna måste du skriva "Selection.Borders (xlDiagonalDown) .LineStyle = xlContinuous" och "Selection.Borders (xlDiagonalUp) .LineStyle = xlContinuous" under den. Att skriva "End Sub" stänger subrutinen. Efter att ha klickat på "Makroer" på utvecklarens flik och sedan "Kör" visas X-raderna i cellerna A6, B6 och C6.

Populära Inlägg