Jump to content

molfi

Members
  • Content Count

    14
  • Joined

  • Last visited

About molfi

  • Rank
    Member

Converted

  • Campos
    ;

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. Hola a todos! Tengo dos archivos, AA y BB. Ambos archivos tiene varias hojas y ambos archivos los guardo como HTM. Necesito poner un hipervinculo en AA que me lleve a una hoja específica del HTM de BB. ¿Se puede hacer? Desde ya, muchas gracias por la lectura!
  2. Gracias DiegoLG! Era exactamente lo que necesitaba! :-D
  3. Hola! Desde ya, muchas gracias por la ayuda!!! Mi problema es el siguiente. Tengo dos TextBox donde ingreso manualmente una fecha, por ejemplo: 01/01/2001 y en el otro 02/01/2001. Quisiera saber como puedo hacer la resta entre las fechas y que me aparezca en una etiqueta (o en otro formato, pero necesito verla en un UserForm). Saludos!
  4. Leopoldo, sos un genio! Exactamente eso necesitaba. Mil gracias por ayuda!
  5. 1. El objetivo de la macro es buscar algo dentro de una tabla de datos. 2. Que cuando lo encuentre en una fila, que ponga el numero de fila en otra hoja. 3. Como las celdas van a tener mucha informacion, lo que busco puede repetirse en una misma fila, entonces cuando lo encuentre por 1era vez, me informe, y que siga con la siguiente fila.
  6. Raro, pero bueno, lo vuelvo a adjuntar. Ayuda pedida.xlsm
  7. No sería forzar desde el inicio... sino que siga en la fila siguiente cuando entra lo buscado por primera vez en una fila. Un ejemplo gráfico sería: si en la fila 1 en la celda B1 encuentra lo que busco, se siga buscando por la fila 2 y asi sucesivamente. Adjunto un archivo para ayudar: Ayuda pedida.xlsm
  8. Hola a todos! Tengo 2 solapas, una llamada "Todo" (porque tiene toda la informacion que necesito) y otra llamada "Busqueda" (donde quiero que me aparezca la información que busco). Yo hice una macro para que busque cualquier tipo de texto en toda la hoja llamada "Todo" pero cuando en la misma fila se encuentra con lo que estoy buscando, la macro se corta... Claramente estoy necesitando algo que le diga al Excel que cuando encuentre lo que busco, que siga buscando en la fila siguiente. busq = InputBox("Ingresa código a buscar") If IsEmpty(busq) Then Exit Sub Set busco = Sheets("Todo").Range("A3:AW100").Find(busq, LookIn:=xlValues, lookat:=xlPart, SearchDirection:=xlNext) If Not busco Is Nothing Then primera = busco.Row i = 4 Sheets("Busqueda").Range("E1").value = busqueda Do Sheets("Busqueda").Cells(i, 1).value = Sheets("Todo").Cells(busco.Row, 1).value Sheets("Busqueda").Cells(i, 2).value = Sheets("Todo").Cells(busco.Row, 4).value i = i + 1 Set busco = Sheets("Todo").Range("A3:AW3000").FindNext(busco) Loop While busco.Row <> primera And Not busco Is Nothing Else MsgBox "No se encuentra la busqueda", vbExclamation End If Set busco = Nothing ¿Me podrían ayudar a resolver este problema que tengo? Desde ya, muchisimas gracias por el tiempo!
  9. Gracias Antoni! Volvio a funcionar! Observo que debo profundizar en este tema. Gracias otra vez!
  10. Otra pregunta, del mismo tenor: Si quiero hacer esto: Me.TextBox42.Text = .List(.ListIndex, 1) Me.TextBox43.Text = .List(.ListIndex, 2) Me.TextBox44.Text = .List(.ListIndex, 3) Yo escribí esto pero claramente me tiro error: For j = 42 To 70 Controls("Me.TextBox" & j & ".Text") = Controls(".List(.ListIndex," & j - 41) Next j ¿Cuál sería la sentencia correcta?
  11. Otra pregunta, del mismo tenor: Si quiero hacer esto: Me.TextBox42.Text = .List(.ListIndex, 1) Me.TextBox43.Text = .List(.ListIndex, 2) Me.TextBox44.Text = .List(.ListIndex, 3) Yo escribí esto pero claramente me tiro error: For j = 42 To 70 Controls("Me.TextBox" & j & ".Text") = Controls(".List(.ListIndex," & j - 41) Next j ¿Cuál sería la sentencia correcta?
  12. Muchisimas gracias Antoni! Estoy segura que anda! Cuando vuelva a mi escritorio lo pruebo y luego te digo.
  13. Hola! Estoy aprendiendo a base de errores y testarudismo el mundo VBA de Excel. Tengo nociones más que básicas y menos que avanzadas de programación en Access pero hace como 4 años que utilizo. Yo sé que hay alguna manera de hacer un bucle que vaya acrecentando el número de los "Textbox", quizás no sea con For... For i = 1 To 19 If TextBox(i).value = "" Then Cells(3, 1+i) = TextBox(i+20) Else Cells(3, 1+i) = TextBox(i) End If Next i La idea es generar un bucle que haga esto: If TextBox1.value = "" Then Cells(3, 2) = TextBox21 Else Cells(3, 2) = TextBox1 End If If TextBox2.value = "" Then Cells(3, 3) = TextBox22 Else Cells(3, 3) = TextBox2 End If Etc... Desde ya, agradezco toda la ayuda que me puedan dar.
  14. Me llamo Carolina pero me dicen Molfi. Estoy incursionando en el tema del VBA porque antes usaba Access para realizar pequeñas bases de datos pero ahora no tengo la posibilidad de utilizar esa herramienta. Claramente toda ayuda recibida será eternamente agradecida.
×
×
  • Create New...

Important Information

Privacy Policy


CTA Templates.png