Respuesta
en
Microsoft Excel
y en 3 temas más
a
¿Cómo llenar listbox desde excel con datos de access con rowsource?
Prueba con una matriz la cual se carga así, matriz=range("b11").currentregion listbox1.list=matriz Esto es equivalente a una función rowsource, si lo que quieres es cargar un listbox directo de access sin pasar por Excel que es lo que supongo al...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Copiar fila G y H desde la celda G9, no ejecuta
Te falto poner entre comillas el nombre de la hoja Sub Copia_Tipo() If ActiveSheet.Index = 10 Then CUO = Hoja2.Range("M1") Sheets("Hoja2"). Range("G1:H1"). Copy Worksheets("Hoja2").Range("G9:H" & CUO). PasteSpecial xlPasteAll...
Respuesta
en
Microsoft Excel
y en 1 temas más
a
En un formulario quiero cambiar el texto de un Label1 con una macro, pero tengo algo raro porque no cambia el texto en caption.
Veamos lo que quieres sigue la misma línea de lo que has pedido relacioando con VBE y esto es por el mismo estilo, quieres modificar el valor de la label1 del userform lugarfaldas desde una macro que esta en un modulo estándar, pues bien ciento...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Copiar Datos de una hoja a otra en continuación de la información que se tiene
No me quedo claro que es lo que quieres te envío esta macro Sub COPIAR_COLUMNAS() Set DATOS = Sheets("DATA").Range("A2").CurrentRegion With DATOS FILAS = WorksheetFunction.CountA(.Columns(2)) - 1 COL = .Columns.Count - 1 Set DATOS = .Cells(2,...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Sumar con la Función Sumar.SI VBA
Muy lenta esa macro, lo que pides se puede hacer en un solo paso usando formulas de Excel asi, esta macro coloca la formula sumar. Si con las condiciones que especificaste en la hoja2 a partir de la celda de y hasta la ultima celda con datos de la...
Respuesta
en
Microsoft Excel
a
Extraer solo palabras con MAYÚSCULAS de una celda
Prueba con esta macro Sub TEST() Set datos = Range("A1").CurrentRegion With datos FILAS = .Rows.Count For I = 1 To FILAS With Application SEPARA = .Transpose(.Transpose(Split(.Cells(I, 1)))) End With X = 2: PALABRA = False For J = 1 To UBound(SEPARA)...
Respuesta
en
Microsoft Excel
a
Como Filtrar por Producto, por rangos y nombres en lisbox
Prueba con esta macro Private Sub ComboBox1_Change() Set H1 = Sheets("HOJA1") Set H2 = Sheets("HOJA2") PRODUCTO = ComboBox1.Value H2.Cells.Clear TextBox1.Text = Empty TextBox2.Text = Empty TextBox3.Text = Empty With H1.Range("A4").CurrentRegion...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Insertar un Rango de Celas y Cualidades de las Celdas
¿Supongo a que te refieres a que también quieres copiar la altura de la celda? Si es así esta es la macro Sub copiar_datos() With Sheets("hoja1").Range("a1:g7") x = .RowHeight: .Copy End With With Sheets("hoja2").Range("b15") .PasteSpecial...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Macro para unir celdas de acuerdo a repetición de datos
¿Y el archivo?
Respuesta
en
Microsoft Excel
a
Cálculo de números aleatorios teniendo en cuenta un reloj y una lista de horas
Primero tienes que convertir el valor de la hora a numero y eso se hace a través de la función val, la cual redondeas a 5 y escribes dentro de la fórmula el valor de la hora que quieras comparar en este caso 15:03:04=. 12173, si la comparación es...