Respuesta
en
Microsoft Excel
y en 2 temas más
a
¿Cómo insertar una fila con vba entre dos tablas y una palabra en una columna?
Te anexo la macro actualizada Sub Ejecutar() 'Encuentra el valor 1 en la celda U y los pasa a hoja PDF Dim w As String Application.ScreenUpdating = 0 With Sheets("PDF") .[E2,A4:V8000].ClearContents [A5:U5].AutoFilter 21, "=1"...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Macro para seleccionar parte de las ultimas 68 filas con datos y pegar la selección en otra hoja
H o l a: Te anexo la macro, cambia en la macro "Hoja1" y "Hoja2" por los nombres de tus hojas. La macro pega las últimas 68 filas de la hoja1 en la celda A1 de la hoja2. Si quieres que siempre se peguen en otra celda, por ejemplo en la D4, cambia...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Como puedo enviar un foto que lo tengo como ruta en la celda a1 de la hoja1 a un cuadro de imagen que se encuentra en la hoja3
Lo que tienes que hacer es cargar la imagen desde la ruta Suponiendo lo siguiente, en la celda B3 de la hoja1 está la ruta, en la celda B4 de la hoja1 está el nombre del archivo, por ejemplo: C:\trabajo\datos\ Image008.jpg Notas: al final de la ruta...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Transponer datos de una hoja a otra con otro formato
Te anexo la macro Sub Transponer_Datos() 'Por.Dante Amor Application.ScreenUpdating = False Set h1 = Sheets("Hoja1") Set h2 = Sheets("Hoja2") ' h2.Cells.Clear j = 1 For i = 3 To h1.Range("A" & Rows.Count).End(xlUp).Row Step 8 h1.Cells(i, "A").Copy...
Respuesta
en
Microsoft Excel
y en 3 temas más
a
Excel VBA manpular objetos como parte de una colección.
Te anexo el código Private Sub UserForm_Click() Dim botones As Collection Set botones = New Collection Dim n As Integer Botones. Add "CommandButton1" Botones. Add "CommandButton2" Botones. Add "CommandButton3" Botones. Add "CommandButton4" Botones....
Respuesta
en
Microsoft Excel
y en 3 temas más
a
Macro para botón Buscar, botón Siguiente y Anterior.
Te anexo el código para tu formulario Dim direccion ' Private Sub CommandButton1_Click() 'Buscar direccion = "" Call Buscar(1, xlNext, "A1") End Sub Private Sub CommandButton2_Click() 'Siguiente Call Buscar(2, xlNext, direccion) End Sub Private Sub...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Buscar un valor en la celda A1 de la hoja 1 en un rango en columna de la hoja 2, copiar y traer a la hoja 1 la siguiente columna
Envíame tu archivo con las 2 hojas, me explicas con un ejemplo qué quieres buscar y qué resultado o resultados quieres en la hoja1 Mi correo [email protected] En el asunto del correo escribe tu nombre de usuario “Julio Cesar Diaz”
Respuesta
en
Microsoft Excel
y en 3 temas más
a
Guardar datos de textbox en diferentes hojas.
Escribe la hoja y la celda donde deses guardar. Agregué la función Val( ) para almacenar el dato numérico como número. Private Sub CommandButton1_Click() Sheets("Hoja1").Range("A2").Value = TextBox1.Value Sheets("Hoja2").Range("A2").Value =...
Respuesta
en
Microsoft Excel
y en 3 temas más
a
Guardar Datos textbox verticalmente de un formulario
Sería de esta forma: Private Sub CommandButton1_Click() Set h1 = Sheets("Hoja1") h1.Range("A2").Value = TextBox1.Value h1.Range("A3").Value = Val(TextBox2.Value) h1.Range("A4").Value = Val(TextBox3.Value) End Sub . 'S aludos. Dante Amor. Recuerda...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Macro: ¿Cómo hago para que este relacionada con el nombre de una columna y no a la columna en si?
A qué te refieres con "al nombre de la columna" tienes un encabezado en cada columna y quieres buscar ese encabezado, y una vez localizada la columna con ese encabezado, ¿qué se ejecute la macro? ¿O de qué forma tienes pensado hacerlo? Podrías poner...