Buscar el valor de un textbox en una columna de otro libro...
Tengo un problema con mi macro y aún no sé cuál es:
En mi userform tengo mi textbox "numcot" y el botón "baja"
Cuando presiono el botón "baja" mi macro hace lo siguiente:
Private Sub baja1_Click()
'Abrir mi libro "Seguimiento2015"
Workbooks.Open Filename:="Y:\comp\Seguimiento2015.xlsm"
'Buscar el número que se encuentra en mi textbox "nocot"
Columns("B:B").Select
Set cell = Selection.Find(What:=Val(nocot), After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False)
'Seleccionar la celda correspondiente a la misma fila, pero en la columna "T"
ActiveCell.Offset(0, 18).Select
End Sub
Sin embargo, cuando abre el libro "seguimiento2015" solamente selecciona la columna B, selecciona B1 y selecciona la celda T1... O sea, se brinca la búsqueda...
¿Me puedes ayudar con este problemita? Ya intente cambiar el método de búsqueda, pero en todos los intentos llego al mismo resultado.
2 Respuestas
Y me parece que al momento de escribirlo aquí fue donde estuvo el error, sin embargo ya pude lograr lo que quería, les dejo el código por si alguien más lo pueda necesitar:
Columns("B:B").Select
Cells.Find(What:=NOCOT, After:=ActiveCell).Activate
ActiveCell.Offset(0, 18).Select
Y así de fácil fue, lo encontré "sin querer" quitándole tanto comando.
