![]() 'lng = lng + 1 into your code to account for the newly added row. 'I'm not sure of the command to insert a new row, but if you do insert a ' 'If you want the *following* row, use Rows(lng+1) instead. 'Rows("18:18") with the counter variable, lng, like so: Rows(lng). ![]() 'code in your macro, you can replace the row number (e.g. After that, you can use a loop to find all of the rows that have a cell height greater than a certain value: Dim lng As LongÄo While Not IsEmpty(Range("A" & lng).Value) The only solution seems to be to have a VBA subroutine running in the background constantly that stores the current zoomlevels and the sheet they apply to in a Public variable. You'll notice that the VBA code doesn't use pixels, so you'll have to do a conversion to find the equivalent of 409 pixels. 2 Answers Sorted by: 1 Unfortunately the zoom level (by scrolling with the mousewheel) by default cannot be captured to trigger a VBA script. ![]() Then inspect the VBA code that the macro generates to see how the size of the Row is generated in code. Try recording a Macro and changing the size of a row.
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |