Respuesta
en
Microsoft Excel
y en 2 temas más
a
Set a Outlook Folder desde un valor de una celda
Revisa el código en las siguientes respuestas que envié: Copy texts from current email in Outlook to cells in Excel | MrExcel Message Board Sub Get_Mail_Data() Dim olApp As Object 'Outlook.Application Dim objNS As Object 'Outlook.Namespace Dim...
Respuesta
en
Microsoft Excel
y en 3 temas más
a
Macros para copiar datos de un archivo a otro y remplazar
Revisa si lo siguiente te ayuda: Curso de Macros y Matrices en Excel. #excel #macro - YouTube Curso de macros. Copia datos de un libro a otro. vba dictionary y matrices. - YouTube Curso de Macros y Matrices en Excel. Ejercicio 1 - YouTube Curso de...
Respuesta
en
Microsoft Excel
a
Feliz Navidad y mejor Año ... Excel!
Igualmente les deseo lo mejor a ti y a tu familia. Que pasen una *Feliz Navidad* 🎄 Les envío un afectuoso abrazo.
Respuesta
en
Microsoft Excel
y en 2 temas más
a
EXCEL VBA cómo copiar rangos hasta la última fila con datos de otra columna
Para encontrar la última fila con datos, puedes utilizar: Sub prueba() Dim lr As Long lr = Range("D" & Rows.Count).End(3).Row Range("ZP2:ZZ2").Copy Range("ZP3:ZP" & lr) End Sub Recomendaciones en mi canal: https://youtu.be/j2sf0_ZCr7Y...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Macro para PEGAR la ruta de un archivo en una celda activa
Intenta: Sub prueba() Dim RutaArchivo As String RutaArchivo = "C:\Users\Miguel Angel\Downloads\Sunface Stick.mp4" With Range("D5") .Value = RutaArchivo .Copy 'en este momento tienes la celda copiada 'debes seleccionar la aplicación donde quieres...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Instrucción que PEGUE la ruta de un archivo en Ventana
El contenido de las variables no se puede copiar de esa manera. Una opción es que lo pongas en una celda y después copies la celda. Otra opción es que lo pongas en memoria: Copy code problem | MrExcel Message Board Utiliza lo siguiente para obtener...
Respuesta
en
Microsoft Excel
y en 1 temas más
a
Colocar Fecha y Poder modificarla cuando sea necesario
Prueba: Private Sub CommandButton1_Click() If Range("B4").Value = "" Then MsgBox "Falta cliente" Else Range("F4").Value = CDate(TextBox1.Value) End If End Sub Recomendación: https://youtu.be/5k0szqErdXg Sal u dos Dante Amor
Respuesta
en
Microsoft Excel
y en 2 temas más
a
EXCEL VBA cómo copiar un rango de celdas, hasta la última fila rellena con datos, de otra columna
Para encontrar la última fila con datos, puedes utilizar: Sub prueba() Dim lr As Long lr = Range("D" & Rows.Count).End(3).Row Range("ZP2:ZZ2").Copy Range("ZP3:ZP" & lr) End Sub Recomendaciones en mi canal: https://youtu.be/5k0szqErdXg Sal u dos Dante Amor
Respuesta
en
Microsoft Excel
y en 2 temas más
a
EXCEL Ejecutar una macro si una celda es "VERDADERA"
Ejemplo: If [ZZ5] = False then exit sub ---- Recomendable:
Respuesta
en
VBA
y en 1 temas más
a
Numero 3 en línea de código VBA
Revisa mi respuesta aquí: Duda en la expresión o sintaxis .end(3) o end(xlup) Recomendable: https://youtu.be/PupmVvM16-8 https://youtu.be/dy9w9zbkCaw Sal u dos Dante Amor