Respuesta
en
Microsoft Excel
y en 2 temas más
a
Macro que pegue los datos como valores en el destino y no como fórmula
En lugar de copiar, puedes "pasar" el dato de una hoja a otra, por ejemplo, solamente tienes que indicar cuál celda de la h2 va a ser igual a cuál celda de la h1 Sub Copiar_Datos() ' Set h1 = Sheets("orden de compra") 'hoja origen Set h2 =...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Insertar imagen en rango determinado y eliminar la imagen anterior
Te anexo la macro con los cambios Private Sub CommandButton2_Click() 'Por.Dante Amor ruta = "AL1" 'celda en donde se pondrá la ruta imagen = "T2" 'celda en donde se pondrá la imagen Application.ScreenUpdating = False With...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Macro que pegue datos en la hoja destino como valor y no la fórmula
Utiliza la siguiente: Sub Copiar_Datos() Set h1 = Sheets("orden de compra") 'hoja origen Set h2 = Sheets("Auxiliar Provisorio") 'hoja destino u2 = h2.Range("B" & Rows.Count).End(xlUp).Row + 1 'QUE COLUMNA ENCONTAR VACIA PARA COMENZAR A COPIAR...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Macro para seleccionar un rango que va ir creciendo
Prueba así y me comentas u = Range("A" & Rows.Count).End(xlUp).Row ActiveSheet.ListObjects.Add(xlSrcRange, Range("A1:A" & u), , xlYes).Name = "Tabla13" sal u dos
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Copiar una hoja de excel pero sin los botones de mando
Si no quieres copiar ningún botón, puede ser: Sub Copiar_Hoja() Application.CopyObjectsWithCells = False Sheets("hoja3").Copy after:=Sheets(Sheets.Count) Application.CopyObjectsWithCells = True End Sub Desactivamos la copia de objetos, se copia la...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
¿Cómo llevar datos de un ComboBox a un ListBox?
No entendí muy bien, puedes presionar varias veces el botón agregar, si es así, ¿qué debe ocurrir cada vez que se presione? Por qué quieres agregar el capítulo y subcapitulo al listbox, ya de alguna manera, tienes los datos en su respectivo combo.
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Macro Countif en columnas contiguas cada vez que se ejecute la macro
Prueba con la siguiente: Sub Prueba_contasi() with Workbooks("prueba descamsos.xlsm").Worksheets("Hoja1") uc = .Cells(3, columns.count).end(xltoleft).column + 1 For i = 3 To 28 Nombres = .Cells(i, 1).Value .Cells(i, uc).Value =...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Macro que permite filtrar columna por datos que no empiecen por la letra I
Te anexo la macro Sub Macro4() ' u = ActiveSheet.Range("J" & Rows.Count).End(xlUp).Row ActiveSheet.Range("A1:Z" & u).AutoFilter Field:=10, Criteria1:="<>I*" End Sub . .
Respuesta
en
VBA
y en 3 temas más
a
Macro para ordenar filas por palabra dentro de una cadena
Puedes poner unos ejemplos de lo que tienes en las celdas, pon una imagen con los dato antes de ordenar y otra imagen con el resultado que esperas después de ordenar.
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Seleccionar Dato de una lista de validación usando macro
Utiliza los siguiente para poner "Marzo" en la celda B2 de todas las hojas de tu libro, excepto en estas hojas:"Hoja1", "Resumen" Sub Cambiar_Mes() For Each h In Sheets Select Case h.Name Case "Hoja1", "Resumen" Case Else h.Range("B2").Value =...