Just nu i M3-nätverket
Jump to content

Markera Celler i en tabell med kod


PatrikSPutte

Recommended Posts

PatrikSPutte

Hej ett nytt litet problem = jag har en tabell med olika värden (B4:K??)

Nu vill jag med kod markera hela tabellen samt den sista tomma raden i tabellen.

 

Jag har kommet så långt att jag med kod: väljer första tomma raden i kolumn B

 

Det har jag gjort på följande sätt:

 

Range("B13").Select

Do Until ActiveCell = ""

ActiveCell.Offset(1, 0).Select

Loop

End Sub

(B12 till B4 är tomma men jag vill ha med dom)

Hur kan jag nu skriva kod så att jag får området markerat från den Aktiva cellen till Cellen K4???

 

 

Link to comment
Share on other sites

Ful loop. Mycket ful...

 

Om tabellen sitter ihop räcker det med

 

Range("B13").CurrenRegion.Select

för att markera hela tabellen...

Fast Select-satser har inte i koden att göra bortsett från när du vill visa något för användare.

Vill du använda tabellen i koden?

 

set myRn = Range("B13").CurrentRegion

 

Samt - flyttar tråden till VBA

 

/T

Moderator Kalkylprogram

 

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.



×
×
  • Create New...