buton de cautare
Last Updated: Apr 27 2010 15:49, Started by
octombrie
, Apr 22 2010 16:23
·
0
#1
Posted 22 April 2010 - 16:23
Hi!
Am o intrebare, sunt sigura foarte simpla pentru un programator in VB, dar complicata pentru mine - un necunoscator. Cum se face un buton de cautare in excel 2007? Adica vreau ca intr-un sheet al fisierului excel sa pun niste randuri cu butoane cu nume pe care sa apas si sa ma duca in sheeturile ...care trebuie. Multumesc mult pentru raspuns. PS: It's urgent! |
#2
Posted 23 April 2010 - 20:33
octombrie, on 22nd April 2010, 17:23, said: Hi! Am o intrebare, sunt sigura foarte simpla pentru un programator in VB, dar complicata pentru mine - un necunoscator. Cum se face un buton de cautare in excel 2007? Adica vreau ca intr-un sheet al fisierului excel sa pun niste randuri cu butoane cu nume pe care sa apas si sa ma duca in sheeturile ...care trebuie. Multumesc mult pentru raspuns. PS: It's urgent! =HYPERLINK(referinta, afisare) - unde referinta e un sir care include numele fisierului, al foii si al celulei referite de hyperlink ("[Fisier1]Sheet2!A1"), iar afisare e sirul care va fi afisat in celula respectiva (ex. "Sheet2"). Daca vrei neaparat butoane, macro-ul asociat evenimentului click al butonului respectiv trebuie sa cuprinda o singura linie de cod: Worksheets(nume_foaie).Selectunde nume_foaie e numele foii scris intre ghilimele pe care o vrei activata la apasarea pe buton. La fel de bine in loc de .Select, in linia de cod de mai sus, poti sa folosesti .Activate. Edited by gecs, 23 April 2010 - 20:36. |
#3
Posted 25 April 2010 - 18:21
gecs, on 23rd April 2010, 21:33, said: Nu-i nevoie de butoane pentru asta, poti sa folosesti hyperlink-uri: Insert -> Hyperlink -> alegi referinta hyperlink-ului si scrii textul care vrei sa apara in celula, sau folosesti functia HYPERLINK() =HYPERLINK(referinta, afisare) - unde referinta e un sir care include numele fisierului, al foii si al celulei referite de hyperlink ("[Fisier1]Sheet2!A1"), iar afisare e sirul care va fi afisat in celula respectiva (ex. "Sheet2"). Daca vrei neaparat butoane, macro-ul asociat evenimentului click al butonului respectiv trebuie sa cuprinda o singura linie de cod: Worksheets(nume_foaie).Selectunde nume_foaie e numele foii scris intre ghilimele pe care o vrei activata la apasarea pe buton. La fel de bine in loc de .Select, in linia de cod de mai sus, poti sa folosesti .Activate. |
#4
Posted 27 April 2010 - 15:49
octombrie, on 25th April 2010, 19:21, said: Multumesc pentru raspuns. O sa folosesc butoane. Stii si cum se customizeaza? Nu gasesc modul de modificare al culorii butonului Daca vrei sa arate cu totul altfel (culori, forma etc.) poti insera un control Image tot de tip ActiveX si poti folosi o imagine creata de tine pe post de buton (cu "butonul" in starea "neapasat"). Codul vba de navigare il pui in procedura asociata evenimentului "Click" si daca vrei sa si simulezi functionarea lui ca buton te folosesti de procedurile asociate evenimentelor "MouseDown" si "MouseUp" pentru a modifica felul in care arata butonul (in "MouseDown" modifici proprietatea "Picture" a imaginii respective cu o imagine care arata butonul apasat, iar in "MouseUp" modifici aceeasi proprietate cu imaginea folosita initial la simularea butonului). O alta varianta de a simula functionarea butonului, daca acesta e de forma dreptunghiulara, e sa te folosesti de aceleasi evenimente ("MouseDown" si "MouseUp"), dar in procedurile asociate acestora sa modifici proprietatea "SpecialEffect" a controlului (sa-i atribui valoarea "fmSpecialEffectSunken" in "MouseDown" si "fmSpecialEffectRaised" in "MouseUp"). |
Anunturi
Bun venit pe Forumul Softpedia!
▶ 0 user(s) are reading this topic
0 members, 0 guests, 0 anonymous users