Respuesta
en
Microsoft Excel
y en 1 temas más
a
Sustituir una fila por otra de otra hoja si coincide un numero en la columna "a" y borrar el sustituido.
Te anexo una macro. Cambia en la macro "Hoja1" y "Hoja2" por los nombres de tus hojas. Cambia el fila = 2 por el número de la fila sola La macro: Sub Sustituir_Fila() 'Por.Dante Amor Set h1 = Sheets("Hoja1") 'hoja que contiene una sola fila Set h2 =...
Respuesta
en
Microsoft Excel
y en 3 temas más
a
¿Como modifica Macro para exportar a PDF?
Te anexo la macro actualizada Cambia "C:\trabajo\diario", por la ruta específica Private Sub CommandButton1_Click() 'ruta = ActiveWorkbook.Path ruta = "C:\trabajo\diario" arch = "VENTA DEL DIA " & Range("J4") ActiveSheet.Range("D1:Q50").Select...
Respuesta
en
Visual Basic
y en 1 temas más
a
Al halar de un formulario un valor inferior a $1.000.000 lo muestra incompleto
Prueba cambiando el valor del textbox Precio con la función CDbl( ) Me permití hacerle algunos ajustes a tu macro: Private Sub Ingresarbtn_Click() ' Dim m, h, wprecio Set h = Sheets("Cotizacion") m = 14 Do While h.Cells(m, 2) <> "" m = m + 1 Loop '...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Impresión de una hoja de cálculo con un numero consecutivo
Te anexo la macro para imprimir. Cambia en la macro "C2" por la celda donde quieres que se ponga el número de folio Sub Imprimir_Hojas() 'Por.Dante Amor copias = InputBox("Número de hojas a imprimir", "IMPRIMIR HOJAS", 1) If copias = "" Or Not...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Agregar dos columnas en una lista desplegable
No entendí muy bien, ¿quieres agregar 2 columnas pero que solo cargue la primer columna? Podrías enviarme tu archivo y me explicas con ejemplos, comentarios e imágenes lo que necesitas. Mi correo [email protected] En el asunto del correo escribe tu...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Necesito una macro en un botón que me genere un archivo txt delimitado por comas, desde excel
Te anexo la macro. Sigue las siguientes indicaciones: Cambia "Hoja2" por el nombre de hoja que quieras guardar como txtCambia "B3" por la celda determinada. Si la celda es una fecha entonces cambia esta línea arch = h.Range("B3")Por estaarch =...
Respuesta
en
Microsoft Excel
y en 1 temas más
a
Macro con evento en hojas protegidas
H o l a : Envíame un correo nuevo con el archivo con la macro y con la hoja protegida.
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Vba filtrar un table de excel por distintos criterios (or), cuyos criterios están en otra pestaña, en un rango variable
Te anexo la macro Sub Filtrar() ' ' Por.Dante Amor ' Set h1 = Sheets("Hoja1") Set h2 = Sheets("criterios") On Error Resume Next h1.ShowAllData On Error GoTo 0 ' u1 = h1.Range("A" & Rows.Count).End(xlUp).Row u2 = h2.Range("A" &...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Separar base de datos en hojas según criterio
Puedes comentarme lo siguiente: 1. Las hojas destino ya existen, ¿si ya existen cómo se llaman? 2. Si no existen las hojas, ¿la macro debe crear cada hoja? 3. Si la macro debe crear la hoja, ¿qué nombre debe ponerle a cada hoja? 4. ¿En qué fila...
Respuesta
en
Microsoft Excel
y en 1 temas más
a
Como modifico la programación de mi libro
Cambia esta línea Worksheets("Hoja3").Pictures.Insert(fichero).Select Por esta ThisWorkbook.Worksheets("Hoja3").Pictures.Insert(fichero).Select . 'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias . Avísame cualquier duda .