Excel - IGUALAR CAPTION DE BOTON 1 A CONTENIDO DE CELDA EXCEL

 
Vista:
sin imagen de perfil
Val: 11
Ha aumentado su posición en 924 puestos en Excel (en relación al último mes)
Gráfica de Excel

IGUALAR CAPTION DE BOTON 1 A CONTENIDO DE CELDA EXCEL

Publicado por CARLINHOS (9 intervenciones) el 04/06/2018 02:06:05
Hola, TENGO UN PROBLEMA CON ESTA MACRO

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub Buena()
' SI ESTA VACIA LA CELDA
If IsEmpty(Cells(3, 2)) Then
   Sheets("Hoja1").Select
 
ActiveSheet.Shapes("Botón 1").Select
Selection.Characters.Text = "En Blanco"
Else
' SI ESTA LLENA LA CELDA
Sheets("Hoja1").Select
ActiveSheet.Shapes("Botón 1").Select
Selection.Characters.Text = Sheets("Hoja2").Range("B3")
End If
 
End Sub

LO QUE INTENTO HACER ES QUE EN LA HOJA 2 HAY UNA TABLA CON LOS CONTENIDOS DE PLATOS DE MENU, DE ACUERDO AL CONTENIDO DE LA CELDA CAMBIA EL CAPTION DEL BOTON 1,2,3, SI ESTA VACIA LA CELDA COLOCA EN EL CAPTION " EN BLANCO". ESTE CODIGO ME FUNCIONA CON EL PRIMER IF, PERO SI LE AGREGO OTRO IF Y PREGUNTO YA NO DE LA FILA 3 SINO DE LA FILA 4 Y BOTON 2 NO CAMBIA.....AYUDA
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Antoni Masana
Val: 4.105
Plata
Ha mantenido su posición en Excel (en relación al último mes)
Gráfica de Excel

IGUALAR CAPTION DE BOTON 1 A CONTENIDO DE CELDA EXCEL

Publicado por Antoni Masana (1415 intervenciones) el 05/06/2018 07:17:45
Como no pones el resto de código es difícil saber porque no funciona.

1
2
3
4
5
6
7
8
9
10
11
Sub Buena()
    If IsEmpty(Cells(3, 2)) Then
        Sheets("Hoja1").Select                     ' --- SI ESTA VACIA LA CELDA
        ActiveSheet.Shapes("Botón 1").Select
        Selection.Characters.Text = "En Blanco"
    Else
        Sheets("Hoja1").Select                     ' --- SI ESTA LLENA LA CELDA
        ActiveSheet.Shapes("Botón 1").Select
        Selection.Characters.Text = Sheets("Hoja2").Range("B3")
    End If
End Sub

En este código no veo la referencia ni a la fila 4 ni al botón 2, quizás sea por eso que no funciona.
Creo suponer cual es el problema, ¿La celda B3 a que hoja hace referencia en el IF?

Saludos.
\\//_
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar