ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Help With Worksheet Operations (https://www.excelbanter.com/excel-programming/273130-help-worksheet-operations.html)

Justin Starnes

Help With Worksheet Operations
 
Is there any way in vba code to reproduce the same functionality in Excel as
pressing Ctrl+right and/or Ctrl+down? I need a quick way to move to the last
column and the last row on a spreadsheet.

Also, is there a quick way to convert the worksheet to a string array or
anything else (maybe a dataset)?



Jose Rojas

Help With Worksheet Operations
 
Try Some Like this

Sub MovetoEndDown()
Range("A1").End(xlDown).Activate '(xlToRight) in case you want to move to
the right.
End Sub
or
Sub MoveDownPlus1Row()
Dim NextRow As Variant
NextRow = Range("A20000").End(xlUp).Row + 1
Cells(NextRow, 1).Activate
End Sub

Hope this works.
Jose Rojas

"Justin Starnes" wrote in message
...
Is there any way in vba code to reproduce the same functionality in Excel

as
pressing Ctrl+right and/or Ctrl+down? I need a quick way to move to the

last
column and the last row on a spreadsheet.

Also, is there a quick way to convert the worksheet to a string array or
anything else (maybe a dataset)?





Tom Ogilvy

Help With Worksheet Operations
 
Dim vArr as Variant
vArr = ActiveWorksheets.UsedRange.Value

for i = lbound(varr,1) to ubound(varr,1)
for j = lbound(varr,2) to ubound(varr,2)
debug.print i,j, varr(i,j)
Next
Next

Regards,
Tom Ogilvy



Justin Starnes wrote in message
...
Is there any way in vba code to reproduce the same functionality in Excel

as
pressing Ctrl+right and/or Ctrl+down? I need a quick way to move to the

last
column and the last row on a spreadsheet.

Also, is there a quick way to convert the worksheet to a string array or
anything else (maybe a dataset)?





Justin Starnes

Help With Worksheet Operations
 
Thanks!
Justin

"Jose Rojas" wrote in message
...
Try Some Like this

Sub MovetoEndDown()
Range("A1").End(xlDown).Activate '(xlToRight) in case you want to move to
the right.
End Sub
or
Sub MoveDownPlus1Row()
Dim NextRow As Variant
NextRow = Range("A20000").End(xlUp).Row + 1
Cells(NextRow, 1).Activate
End Sub

Hope this works.
Jose Rojas

"Justin Starnes" wrote in message
...
Is there any way in vba code to reproduce the same functionality in

Excel
as
pressing Ctrl+right and/or Ctrl+down? I need a quick way to move to the

last
column and the last row on a spreadsheet.

Also, is there a quick way to convert the worksheet to a string array or
anything else (maybe a dataset)?








All times are GMT +1. The time now is 05:39 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com