951 resultados
Ordenar por fecha - Ordenar por pertinencia
Todos (951)
Prensa (6)
Foros (945)
 
Otros resultados también están disponibles en nuestros foros :
Ayuda con Pivot en VBA
Saludos a todo el grupo! Grabe la siguiente Macro: Lo que hace basicamente es crear una pivot y quitar los totales de los campos que la componen. Funciona sin ningun problema, para esa hoja. Necesito que se ejecute en otras hojas con distintos ...
Mensaje publicado en el 10/05/2007 - 18:20
ComboBox1
Hola a todos. Tengo la siguiente macro: Public Sub ComboBox1_Change() Range("a1").Select Sheets("loca").Visible = True Sheets("loca").Select Range("d7:u40").Select Selection.Columns.AutoFit ...
Mensaje publicado en el 07/05/2007 - 13:35
Ayuda con buscarv
Hola a todos. Tengo la siguiente macro que me busca un número en un archivo y me dice si existe o no existe: Dim nom As String Dim c As Long Dim r As Range c = Val(InputBox("Digite el número de cédula", ...
Mensaje publicado en el 07/02/2007 - 23:14
Eliminar columnas
Tengo el siguiente macro que alguien me lo dio en algun momento que estaba necesitando: Sub concatena() Dim celda As Range For Each celda In Selection celda = celda.Offset(0, 1) & " " & celda.Offset(0, 2) & " " & ...
Mensaje publicado en el 07/12/2006 - 18:58
Añadir un parametro.
Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...
Mensaje publicado en el 18/08/2006 - 19:51
Añadir un parametro.
Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...
Mensaje publicado en el 18/08/2006 - 19:51
Añadir un parametro.
Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...
Mensaje publicado en el 18/08/2006 - 19:51
Añadir un parametro.
Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...
Mensaje publicado en el 18/08/2006 - 19:51
Añadir un parametro.
Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...
Mensaje publicado en el 18/08/2006 - 19:51
Añadir un parametro.
Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...
Mensaje publicado en el 18/08/2006 - 19:51
Añadir un parametro.
Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...
Mensaje publicado en el 18/08/2006 - 19:51
Añadir un parametro.
Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...
Mensaje publicado en el 18/08/2006 - 19:51
LLenar fechas en hoja de caja, error de sintaxis
Hola grupo, hace dias pedi ayuda para llenar las fechas consecutivas en una hoja de caja. Rapidamente , Hector Miguel, muy agradecido por mi parte, contestó con la siguiente macro, pero me da "error de sintaxis". Me podeis ayudar de ...
Mensaje publicado en el 12/02/2006 - 10:43
Error 9 en Tiempo de Ejecución
Holas Grupo, estoy tratando de ejecutar la siguiente macro y me sale Error 9 en Tiempo de Ejecución. Sub Macro3() Application.ScreenUpdating = False Sheets("E.Cta.").Select Sheets("E.Cta.").Copy Cells.Select ...
Mensaje publicado en el 25/07/2005 - 23:50