Abraham Valencia

[Hola Prueba así: Sub Borrar() Dim UltimaFila As Long, x As Long Let UltimaFila = Cells(Rows.Count, 1).End(xlUp).Row For x = UltimaFila To 2 Step -1 If Range("A" & x).Value = "" Then Range("A" & x).EntireRow.Delete End If Next End Sub Comentas...

[Hola Intenta algo así: Me.ListBox1.RowSource = Workbooks("Fuente de materiales.xls").Worksheets("Contenido").Range("A4:A400").Address(external:=True) Si bien te lo he colocado con un rango fijo, cuestión de solo adaptarlo a una variable. Saludos]...

[Hola No es posible usar macros "en línea", bajo ninguna circunstancia. Lo siento. Abraham Valencia

[Hola Pues ¿qué es "DlgDialogo"? He ahí el dilema. Abraham Valencia

[Hola Pues teóricamente no deberías tener problemas, debe de haber algún detalle que estás obviando pero para no especular/adivinar mejor coloca el archivo en algún "Drive" y comparte el enlace por aquí. Abraham Valencia

[Hola Usa esto: CreateObject("wscript.shell").Popup "Todo listo", 2, "Proceso terminado" Saludos] Abraham Valencia

[Hola Deshabilitar, propiamente dicho, te será más complicado de lo que crees ya que hay varias formas de hacerlo: - Usando la Cinta de Opciones - Usando atajo del teclado (CTRL + X) - Usando el Menú Contextual de las celdas - A través de macro -...

[Hola Hay muchos objetos que ya no so compoatibles con Excel, entre ellos los "Flexgrid". Sobre ellos: - No funciona en versiones de Office de 64 bits (sea 2010, 2013 u otro) - No (siempre) funciona en Office 2013 de 32 bits instalado en Windows 7 de...

[Hola Sugiero que ordenes un poco la explicación ya que, por ejemplo, hablas de un solo libro que tiene dos hojas: Hoja1 y Hoja2; pero en la supuestas referencias usas "Libro1", además, hay tal mención de celdas distintas (y distantes) que parece que...

[Hola Ambos archivo deben de estar abiertos, basta que hagas referencia a ese "segundo" libro: WorkBooks("Nombredellibro.xlsx").WokSheets("Nombredelahoja").Range("A1").Value = "Hola" Saludos] Abraham Valencia PD: Lo otro es abrir el archivo, enviarle...