
06/04/2009, 10:28
|
| | Fecha de Ingreso: marzo-2009
Mensajes: 7
Antigüedad: 16 años Puntos: 0 | |
Respuesta: macro que seleccione fila con datos ya tengo otra opcion d codigo q segun yo ya solo necesita una correccion o bueno falta:
Dim myrange As Range
Sub Macro4()
' Acceso directo: CTRL+i
'busca la ultima columna
If WorksheetFunction.CountA(Cells) > 0 Then
ultimacol = Cells.Find(What:="*", After:=[A1], SearchOrder:=xlByColumns, SearchDirection:=xlPrevious).Column
End If
Set myrange = Range(Selection, Range("bo65536").End(xlUp)) aqui donde yo manualmente le pongo la columna(BO) pero quiero que ahi la columna pueda ser variable, aunque generalmente es la utlima columna
myrange.Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub |