s_magico

Enrique Bernal respondió: Este link te podría ayudar http://www.recursosvisualbasic.com.ar/htm/listado-api/85-autocompletar-combo.htm#1

macros_excel respondió: Te recomiendo descargar algunas plantillas que tengo colgadas en mi página la plantilla se llama Busca_en_todas_hojas.xls www.expertosmacrosexcel.es.tl Solo tienes que enviar un mensaje de texto para ver la contraseña de descarga

jrgces respondió: =INDICE(Hoja1!$A:$A;COLUMNA()) Quizás sea necesario sustituir el punto y coma por una coma, depende de la configuración regional del equipo.

230283 respondió: Dentro de breves momentos retorno con la fórmula que necesitas. La solución la haré llegar por este mismo medio. Descuida. Christian

calvuch respondió: Añade un botón a tu hoja 1 y en el evento click debes agregar esto Dim nombre As Variant Hoja1.Activate Dim C As Integer Dim F As Integer Dim i As Long nombre = Trim(Range("C2").Value) If Len(nombre) = 0 Then Exit Sub Range("A3", "C65536").Clear...

aetxezar respondió: Te paso el codigo de un libro. Tiene que tener un hoja llamada impreso. Ahi te metera las filas con la columna c >0 en la hoja hoja1 y luego te la imprime. Sub imprimir() Sheets("impreso").Cells(1, 1).Value = Sheets("Hoja1").Cells(1, 1).Value...

manuelpacha respondió: Prueba insertando este código en eventos del formulario. Private Sub Form_AfterUpdate() On Error Resume Next If IsNull(Me.codigo) = False Or IsNull(Me.descripcion) = False Then If Me.cantidad = 0 Then MsgBox "Incorporar cantidad" DoCmd.GoToRecord , ,...

dayvitt respondió: Prueba sustituir: DLookup("[nombre]", "tabla_pruebas", "[codigo]= " + Str(Me.Text2)) Por: DLookup("[nombre]", "tabla_pruebas", "[codigo]= " & Chr(34) & Me.Text2 & Chr(34))