Marcial C. C.

Si es posible con la función Coincidir. Fíjate en la fórmula de A1: =COINCIDIR(A2;B2:B8;0)+1 La función COINCIDIR, devuelve la posición del elemento buscado en una matriz (rango). Aquí le decimos que busque lo que hay en A2 (Edificio) en el rango...

Te dejo una macro que hace lo que tu deseas Sub rellenar() 'Recorremos toda la columna X hasta la última fila con datos' 'Empieza en la fila 1, si quieres qeu empiece en otra fila cambia el 2' For t = 1 To Range("X" & Rows.Count).End(xlUp).Row 'Si el...

Puedes hacer lo siguiente: 1º Oculta las columnas F y H, las seleccionas, pulsas botón derecho del mouse y seleccionas ocultar. 2º Selecciona el rango de celdas en la que vayas a introducir datos por ejemplo de E11 a H33. Introduce los datos en cada...

Podrías especificar más tu pregunta. Dices " la celda AX que los contiene", para activar esa celda con una fila determinada puedes hacerlo así: Range("AX" & fil).Activate Donde fil es la variable que guarda el número de fila.

Te he dejado un archivo aquí https://www.dropbox.com/s/dk93y39a61o32j0/mostrar%20pesos%20o%20dolares.xlsm?dl=0 Cuando lo abras, habilita las macros para que te funcione. Si pulsas ALT + F11 irás al editor de VBA donde puedes ver el código de la...

Debes modificar la propiedad TabIndex de los controles de tu formulario. Esta propiedad indica el orden en el que recorre los controles al pulsar enter. Pon un 1 al primer control, 2 al segundo, etc. Por favor, si te ha valido la respuesta, puntúala...

Con esto imprimes el formulario Me. PrintForm Y con esto abres el cuadro de diálogo Guardar como Application.Dialogs(xlDialogSaveAs).Show No olvides puntuar y cerrar la pregunta.

Prueba con esto: ActiveSheet. PrintPreview Por favor, si te ha valido la respuesta, puntúala y cierra la pregunta.

Lo que necesitas es usar la Validación de Datos. Te paso un archivo PDF creado por mí para un curso de Excel 2010, donde lo explico. https://www.dropbox.com/s/mwd413rihg94w9w/VALIDACI%C3%93N%20DE%20DATOS.pdf?dl=0 Si te ha valido la respuesta, no...

Aquí te dejo la macro que cómo verás, lo hace mucho más rápido. Sub Elimina_FilasyColumnas_Ocultas() Dim hoja As Worksheet Dim col As Integer, fila As Long For Each hoja In ThisWorkbook.Worksheets For col = hoja.UsedRange.Columns.Count To 1 Step -1...