Selectare foaie dupa numele din combo box

Închis
RAMBO
Mesaje: 474
Membru din: Mie Noi 25, 2009 2:17 pm
Localitate: Pitesti

Selectare foaie dupa numele din combo box

Mesaj de RAMBO » Mie Oct 18, 2017 11:49 am

Plecand de la ideea unui cod simplu pentru a selecta o celula nu neaparat in foaia activa de genul:

Cod: Selectaţi tot

Sheets("Foaie1").Range("A1").Select
doresc sa fac acelasi lucru, dar sheetul (numele sheetului) va fi selectat dintr-un combo box dintr-un user form. Sa zicem ca numele combo box-ului cu pricina este "combo1", cum ar trebui sa arate codul daca vreau sa selectez A1 din sheetul selectat in combo1?
Multumesc.

TudyBTH
Moderator
Moderator
Mesaje: 993
Membru din: Joi Feb 11, 2016 2:12 pm
Localitate: Cluj Napoca

Re: Selectare foaie dupa numele din combo box

Mesaj de TudyBTH » Mie Oct 18, 2017 5:50 pm

Sheets(ComboBox1.value).Range("A1").Select
Am invatat sa inotam in apa, ca pestii
Am invatat sa zburam in aer, ca pasarile
A ramas doar sa invatam sa traim pe Pamant, ca Oamenii.

RAMBO
Mesaje: 474
Membru din: Mie Noi 25, 2009 2:17 pm
Localitate: Pitesti

Re: Selectare foaie dupa numele din combo box

Mesaj de RAMBO » Joi Oct 19, 2017 10:29 am

Multumesc. Eu puneam ".Value" in afara parantezei. :)

IPP
Moderator
Moderator
Mesaje: 4196
Membru din: Mie Iul 29, 2009 7:26 am
Localitate: Cluj-Napoca

Re: Selectare foaie dupa numele din combo box

Mesaj de IPP » Joi Oct 19, 2017 12:01 pm

Buna ziua

Vreau sa va intreb daca intr-adevar functioneaza codul

Cod: Selectaţi tot

Sheets("Foaie1").Range("A1").Select
in conditiile in care la momentul rularii sale foaia activa Nu este "Foaie1"

...si daca functioneaza codul

Cod: Selectaţi tot

Sheets(ComboBox1.value).Range("A1").Select
in conditiile in care, la momentul rularii, numele foii active Nu este identic cu cel selectat in combobox1

Daca nu, poate aveti nevoie de un cod (basic, nu trateaza necompletarea informatiei in combobox sau un nume care nu exista)

Cod: Selectaţi tot

Application.Goto Reference:=Sheets(ComboBox1.Value).Range("A1")
IP

Închis

Înapoi la “Visual Basic for Application (VBA) cu Excel - Intrebari tehnice”