No ejecutar código si una celda de un rango esta vacío

Preguntas y respuestas relacionadas

Macro de mayúsculas, con un problema

Tengo esta macro para todo mayúsculas: Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range(" A12:A41,C12:C41")) Is Nothing Then Target.Value = AMayusculas(Target.Value) End If End Sub Y en un modulo: Public Function...
2 respuestas

Como puedo evitar un error en una marco de relleno ?

Les comento que me esta dando errores una macro de relleno Las 2 las puse porque necesito que me rellene con un "0" las celdas vacías en la columna B2:B29, pero la misma depende de la columna D y comuna G. Ejemplo 1 --- si solo hay datos en el rango...
1 respuesta

Ocultar filas mediante VBA en Excel

He leído muchas preguntas y sus respuestas me parecen muy buenas y en estos momentos necesito ayuda, he intentado por algunos medios que mediante un el valor de una celda se me oculte la fila que contiene esa celda. La cuestión es la siguiente tengo...
1 respuesta

Copiar celdas impares y copiarlas en celdas pares de otra columna

Necesito de su ayuda ya que tengo un archivo en donde tengo datos los cuales necesito copiar y pegar en otra columna, los datos en cuestión son generados de una aplicación que los scanean y los ponen en una misma columna por ejemplo en la celda A2 me...
1 respuesta

Macro lenta en la ejecución calculando celdas

Tengo esto en la hoja : Private Sub Worksheet_Activate() ActiveSheet.ScrollArea = "A1:Q6000" Call Celdas_oculta End Sub Private Sub Worksheet_Change(ByVal Target As Range) 'Por.Dante Amor If Target.Column = 4 Then If Cells(Target.Row, "B") = "" Then...
2 respuestas

Comparar 2 columnas y resultado en una tercera.

He aquí el dilema: Tengo una tabla con dos columnas con palabras: (A) (B) Casa Antonio Perro Juanito Gato Feo Juanito Casa Masticar Felpudo Lo que necesito es una fórmula que genere una tercera columna (C) con las palabras que hay en B que no estén...
2 respuestas

Macros en códigos de hojas Excel

Necesito desarrollar una macro que me copie la fórmula de una celda superior. Escribí este código: Private Sub Worksheet_change(ByVal Target As Range) Dim ufila As Byte ufila = Range("a:A").End(xlUp).Row Dim rango1 As Range Range("a2").Select Do...
1 respuesta

Como le pongo titulo a las columnas de Listbox

Tengo un Listbox de 5 columnas y tienen el cabesado activado pero sale en blanco, como le pongo títulos. Este es el codigo: With UserForm1 ListBox1.ColumnCount = 5 ListBox1.ColumnHeads = True ListBox1.ColumnWidths = "20;20;20;100;20" ListBox1.AddItem...
1 respuesta

Envío mails a varios destinatarios con 2 archivos adjuntos.

Alguien me podría ayudar y decirme ¿Cómo seria el código para el envío por mail de 2 archivos adjuntos a varios destinatarios de un listado de Excel en el que constarían sus nombres y dirección de correo?
1 respuesta

Contar colores con excel

Mi problema es que no consigo contar los días festivos, vacacionales, de puente y de faltas dentro de un calendario en excel. Tengo diferentes colores para cada cosa y una hoja por cada trabajador anual. Me gustaría poder saber de cada hoja en...
1 respuesta
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas de los temas