Business
Jobs
  • About Us
  • Solutions
    • Job Postings
      Post your job and receive qualified candidates in 48h.
    • Candidate Assessments
      500+ technical and psychological tests, plus anti-fraud.
    • Headhunting
      Tailor-made executive search from start to finish.
    • Payroll + EOR
      Payroll dispersal and EOR across 15+ LATAM countries.
  • Pricing
  • Jobs

0

218
Views
Ocultar rangos con nombre en Excel usando un cuadro combinado y VBA

He insertado un cuadro combinado con 3 rangos con nombre que muestran datos detallados y 3 opciones en el menú desplegable ('A', 'B', 'C'). Me gustaría escribir una macro para asignar al cuadro combinado de modo que si el usuario selecciona 'A' en el menú desplegable, mi rango con nombre llamado 'NR1' sea visible mientras que mis otros dos rangos con nombre 'NR2' y 'NR3' están ocultos . Luego, si se selecciona 'B', los rangos con nombre 'NR1' y 'NR3' se ocultan. Luego, si se selecciona 'C', los rangos con nombre 'NR1' y 'NR2' están ocultos. El VBA es el siguiente, pero aparece un mensaje de error que dice "Objeto requerido".

Cualquier ayuda sería muy apreciada.

 Sub ComboBox1_Change() If ComboBox1.Value = "A" Then Range("NR1").EntireRow.Hidden = False Range("NR2").EntireRow.Hidden = True Range("NR3").EntireRow.Hidden = True ElseIf ComboBox1.Value = "B" Then Range("NR2").EntireRow.Hidden = False Range("NR1").EntireRow.Hidden = True Range("NR3").EntireRow.Hidden = True ElseIf ComboBox1.Value = "C" Then Range("NR3").EntireRow.Hidden = False Range("NR1").EntireRow.Hidden = True Range("NR2").EntireRow.Hidden = True End If End Sub
about 4 years ago · Santiago Trujillo
1 answers
Answer question

0

Como lo menciona Soctt Craner, NR1...NR3 son nombres de celda dentro de la hoja de trabajo. Cambie el nombre de los rangos como Nrng1, Nrng2, Nrng3. Probé su código con un cuadro combinado insertado en la hoja y todo está bien.

about 4 years ago · Santiago Trujillo Report
Answer question
Find remote jobs

Discover the new way to find a job!

Top jobs
Top job categories
Business
Post vacancy Pricing Sales
Legal
Terms and conditions Privacy policy
© 2026 PeakU Inc. All Rights Reserved.
Andres GPT
Show me some job opportunities
There's an error!