Cecilio Pérez Maqueda

Cecilio Pérez Maqueda

Con hambre de aprender Macros
 17,7K puntos  México @cecilioperezmaqueda desde - visto

Respuestas en Programación

Respuesta en y en 2 temas más a

Macro para insertar un valor en una celda de excel

A ver si te entendí mientras tengas datos en la columna A quieres insertar determinada palabra en la columna "B" me imagino que varia los datos de la columna A Prueba y comentas En este ejemplo supuse que tus datos inician en la celda A1 puedes...
Respuesta en y en 1 temas más a

Corregir Range en VBA a ejecutar en lista desplegable

Quieres qué al realizar cualquier cambio en el rango ("A2:¿A300") automáticamente se limpie tu celda B2? Ya intentaste algo así como Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$2:$A$300 Then Range("B2").ClearContents...
Respuesta en y en 2 temas más a

Tengo una suma en una columna y una resta en otra columna, necesito que mediante una macro la suma y la resta en la columna..

Si gustas mándame Tu archivo para trabajarlo y me pones un ejemplo del resultado esperado [email protected]
Respuesta en y en 2 temas más a

Macro copiar y pegar dependiendo de un valor

¿Por decir si escogen Gass que haría o si escogen american?
Respuesta en y en 3 temas más a

Código Macro para fijar títulos

¿Y no te serviría algo así? ¿O no se encuentran en el mismo rango tus títulos? Tit = range("B2:N2")
Respuesta en y en 3 temas más a

MsgBox Que Ejecute Una Macro

siono = MSgbox("¿Desea ejecutar la rutina?", vbQuestion + vbYesNo, "Confirmar") If siono <> vbYes Then GoTo saliendo MSgbox "La rutina no se ejecutó" Aquí iría tu rutina que deseas que se ejecute Saliendo: Exit sub
Respuesta en y en 2 temas más a

Macro que compare datos coincidentes en una columna en 2 hojas diferentes y cuando los encuentre copie datos de fila en hoja 2

Que tal mira este ejemplo te puede servir adáptalo según tu proyecto Sub concilia() 'by Cperez maqueda Dim i As Long Dim y As Long Dim wb As Workbook: Set wb = ThisWorkbook Dim h1 As Worksheet: Set h1 = wb.Sheets("Hoja1") Dim h2 As Worksheet: Set h2...
Respuesta en y en 2 temas más a

Importar Hoja Excel de otro libro conservando formatos

Si es que te los copio como texto agregale, Después de tu paste, haz lo siguiente: En este ejemplo estoy con la columna B y de adáptalo a tus columnas/rango que necesites Range("B:B").SpecialCells(2).Value = Range("B:B").SpecialCells(2).Value...
Respuesta en y en 2 temas más a

Copiar datos de diferentes celdas y pegarlas en una tabla

Sub quiebres() Dim wb As Workbook: Set wb = ThisWorkbook Dim Ho As Worksheet: Set Ho = wb.Sheets("Resumen") Dim Hd As Worksheet: Set Hd = wb.Sheets("Registro") Dim ucel 'ucel = Hd.Range("A" & Rows.Count).End(xlUp).Row + 1 'For i = 2 To Ho.Range("A" &...
Respuesta en y en 2 temas más a

Agregar ceros a una celda dependiendo el numero de caracteres

Sin macros sería así Selecciona la columna completa Formato de celdas Personalizada En donde dice tipo Escribes los 13 ceros 0000000000000 ¿O necesitas macros?