Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

kako izabrati sliku

[es] :: Office :: Excel :: kako izabrati sliku

[ Pregleda: 2408 | Odgovora: 14 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

erc kragujevac
Radomir Brzakovic
Focal point for SAP

Član broj: 30491
Poruke: 144
*.dynamic.sbb.rs.



+2 Profil

icon kako izabrati sliku25.12.2010. u 21:22 - pre 162 meseci
evoo cemu se radi. dobio sam aplikaciju u excelu gde kada unesem sifru dela i kliknem potvrdi sifra se ispise na kartice( formirano u excelu u vise celija). sad bi hteli da se prilikom unosa recimo sifre 1 u polje image1(mislim da je formirano od vise merdzovanih celija) sa zadate putanje uzme slika koja nosi taj broj. ako se ponovo udje u aplikaciju i unese sifra 2trebalo bi kada se promeni sifra na kartici da se pokupi i slika sa tim brojem. znaci u jednom otvaranju mi treba da uradim nesto nalik ovome image1.picture=c:\textbox1.text
( gde je vrenost textboxa uneta sifra koja se potvrdom ispisuje na kartici.
 
Odgovor na temu

Jpeca
Predrag Jovanović
poslovni analitičar
Gowi
Pančevo

Moderator
Član broj: 25683
Poruke: 2268
*.wimax.verat.net.

Sajt: www.gowi.rs


+109 Profil

icon Re: kako izabrati sliku26.12.2010. u 10:36 - pre 162 meseci
U ovoj temi http://www.elitesecurity.org/t348872-0#2147089 naći ćeš rutinu koja umeće sliku u ćeliju. Ako naiđeš na neke probleme da prilagodiš tu rutinu svojoj situaciji, navedi detalje pa da pomognemo.
Ako umesto u ćeliju želiš da ubaciš sliku u textbox pogledaj ovde http://www.mrexcel.com/forum/showthread.php?t=86017
Nije to loše Rembrante, samo što ne bi dodao još malo boje?
 
Odgovor na temu

erc kragujevac
Radomir Brzakovic
Focal point for SAP

Član broj: 30491
Poruke: 144
*.dynamic.sbb.rs.



+2 Profil

icon Re: kako izabrati sliku26.12.2010. u 17:38 - pre 162 meseci
hvala na pomoci,ali nesto sam probao i ne funkcionise mi. okacicu excel fajl pa ako mozes pogledaj sta bih hteo da postignem. zalepio sam slike kako izgledaju sheetovi u excelu. sam excelov fajl je poveliki zbog neke tabelice koja glumi bazu pa se ostala polja na osnovu unete sifre i posle potvrde na dugme izvrsi azuriraju sa VLOOKUP. ja sam dao dva ekrana za dve razlicicte sifre. ako te budu zezali makroi sredi na security sa low.okacicu i ove dve slike koje sam koristio. slike sam ubacivao na mnogo glup nacin . prvo ukljucim makroe da bih sve azurirao ,a onda iskljucim ,izadjem iz fajla,kliknem na image1 propertis pa kroz picture izaberem bitmap i ona bez obzira na velicinu lepo napuni odgovarajuce polje.kada mi treba nova sifra sve iz pocetka. unapred hvala.

[Ovu poruku je menjao erc kragujevac dana 26.12.2010. u 20:11 GMT+1]

[Ovu poruku je menjao erc kragujevac dana 26.12.2010. u 20:26 GMT+1]

[Ovu poruku je menjao erc kragujevac dana 26.12.2010. u 20:30 GMT+1]
Prikačeni fajlovi
 
Odgovor na temu

Jpeca
Predrag Jovanović
poslovni analitičar
Gowi
Pančevo

Moderator
Član broj: 25683
Poruke: 2268
*.wimax.verat.net.

Sajt: www.gowi.rs


+109 Profil

icon Re: kako izabrati sliku27.12.2010. u 10:25 - pre 162 meseci
Ne znam šta ne funkcioniše. Probao sam onaj jedostavniji primer sa fiksnim text boxom - čini mi se da je to slučaj kod tebe da sliku ubaciješ u fiksni text box i po potrebi deformišeš - i kod mene radi bez ikakvih problema. Jedino obrati pažnju koji je indeks text boxa u koji umećeš sliku - to treba proslediti kao parametar za Shape().
Nije to loše Rembrante, samo što ne bi dodao još malo boje?
Prikačeni fajlovi
 
Odgovor na temu

erc kragujevac
Radomir Brzakovic
Focal point for SAP

Član broj: 30491
Poruke: 144
*.static.isp.telekom.rs.



+2 Profil

icon Re: kako izabrati sliku27.12.2010. u 12:57 - pre 162 meseci
javlja mi poruku personal.xlsb could not be found kada pokusam da u ovome sto si ti uradio kliknem na izvrsi. kada probam da vidim kod iza toga nema nicega . izvini ako te smaram ali ja sam poprilicno slab sa samim excelom,a imam obavezu da ovo odradim. hvala za pomoc.pozdrav
 
Odgovor na temu

Ivek33

Član broj: 66174
Poruke: 2898



+66 Profil

icon Re: kako izabrati sliku27.12.2010. u 15:59 - pre 162 meseci
meni ovaj @jpecin primjer radi sa umetnutim Macro u VBE (koji je @jpeca vjerojatno zaboravio ostaviti?)
vidi attach
Prikačeni fajlovi
 
Odgovor na temu

erc kragujevac
Radomir Brzakovic
Focal point for SAP

Član broj: 30491
Poruke: 144
*.static.isp.telekom.rs.



+2 Profil

icon Re: kako izabrati sliku29.12.2010. u 08:52 - pre 162 meseci
super radi.hvala. ima li sanse i na koji nacin da umesto sto mu kazem da uzme vrednost iz celije C2 da to bude vrednost uneta u textbox1. umesto range(c2).select da ubacim nesto sto ce da cita textbox1.text. hvala puno i tebi i jpeci. carevi ste.pozdrav
 
Odgovor na temu

Jpeca
Predrag Jovanović
poslovni analitičar
Gowi
Pančevo

Moderator
Član broj: 25683
Poruke: 2268
194.106.170.*

Sajt: www.gowi.rs


+109 Profil

icon Re: kako izabrati sliku29.12.2010. u 10:08 - pre 162 meseci
Prethodni makro sam slučano snimio u Personal workbook, pa je zato nastala zabuna.

Citat:
Ima li sanse i na koji nacin da umesto sto mu kazem da uzme vrednost iz celije C2 da to bude vrednost uneta u textbox1. umesto range(c2).select da ubacim nesto sto ce da cita textbox1.text

U prinicipu ne vidim razlog da se unos vrši preko text boxa na radnom listu umesto direktno u ćeliju, ali je moguće i tako. Kod bi bio
Code:

Sub InsertShapePicture()
Dim Sh As Shape
Dim txtIme As String
'Pronalazi sliku sa brojem iz text boxa plus format GIF u istom folderu kao i radna sveska
txtIme = ThisWorkbook.Path & "\" & ActiveSheet.OLEObjects("TextBox1").Object.Text & ".gif" 
Set Sh = Sheets("Sheet1").Shapes(1) 'postavlja textbox
Sh.Fill.UserPicture txtIme 'insertira sliku sa brojem iz celije C2

End Sub

Nije to loše Rembrante, samo što ne bi dodao još malo boje?
 
Odgovor na temu

erc kragujevac
Radomir Brzakovic
Focal point for SAP

Član broj: 30491
Poruke: 144
*.static.isp.telekom.rs.



+2 Profil

icon Re: kako izabrati sliku29.12.2010. u 12:26 - pre 162 meseci
radi i na ovaj nacin,ali kada sam ubacio u moj fajl ovaj deo kodane javlja gresku,ali nogde ne vidim textbox u koji je ubacio sliku. probacu da smanjim fajl pa da ga okacim ovde.evo okacio sam. ovaj folder foto_elemento se smesti na recimo c:\. u njemu su slike sa imenom kao i sifra koja se unosi. ovaj excel fajl kanban se startuje. ne znam da li mora da se podesi low za makro i kada se u textbox unese sifra i klikne izvrsi on sa sheeta data pokupi podatke i upise na karticu. ja bih hteo da tada sa putanje prema sifri ubaci sliku u delu H I od 18 do 27. probao sam i tvoj i ivekov kod i super radi na praznom excel fajlu,alii ovde ne znam zasto ne javlja gresku , azurira karticu,ali ne ubacuje sliku. mozda je negde i ubaci,ali ja ne vidim. posto sam los sa excelom,a jos losiji sa vb molim te da probas da implementiras resenje za sliku direktno u kanban. kada unesem sifru u text box dobijem podatke i sliku za tu sifru,a kada promenim unos u textbox promene se i podaci,odnosno slika na kartica. pozdarv i hvala unapred
Prikačeni fajlovi
 
Odgovor na temu

Jpeca
Predrag Jovanović
poslovni analitičar
Gowi
Pančevo

Moderator
Član broj: 25683
Poruke: 2268
194.106.170.*

Sajt: www.gowi.rs


+109 Profil

icon Re: kako izabrati sliku29.12.2010. u 13:59 - pre 162 meseci
U tvom primeru nisam našao textbox u koji treba da se ubaci slika. Dodao sam ga i pošto na radnom listu imaš više različitih crteža koji svi pripadaju nizu Shapes objekata, ovaj novi textbox je broj 7 znači pristupaš mu preko indeksa 7

Code:
Set Sh = Sheets("Kanban").Shapes(7)

Nije to loše Rembrante, samo što ne bi dodao još malo boje?
Prikačeni fajlovi
 
Odgovor na temu

erc kragujevac
Radomir Brzakovic
Focal point for SAP

Član broj: 30491
Poruke: 144
*.static.isp.telekom.rs.



+2 Profil

icon Re: kako izabrati sliku29.12.2010. u 14:12 - pre 162 meseci
hvala.radisuper. moraoo sam samo da ga ubacim zajedno sa slikama ili cu menjati putanju,ali je ok. interesujeme ako bi na istom sheetu bile dve ovakve kartice sa potpuno istim podacima da li bi ispod komande za pinjenje prvog textboxa isla i za sliku u drugom(ista slika samo na drugij kartici,kao copy paste varijanta).pozdrav i veliko hvala carevi.
 
Odgovor na temu

Jpeca
Predrag Jovanović
poslovni analitičar
Gowi
Pančevo

Moderator
Član broj: 25683
Poruke: 2268
194.106.170.*

Sajt: www.gowi.rs


+109 Profil

icon Re: kako izabrati sliku29.12.2010. u 14:47 - pre 162 meseci
[img]da li bi ispod komande za punjenje prvog textboxa isla i za sliku u drugom(ista slika samo na drugij kartici,kao copy paste varijanta).[/img]

Možeš koristiti isti kod samo obrati pažnju da za drugi tekstbox nadješ odgovarajući indeks za Shape i njega primeniš.
Nije to loše Rembrante, samo što ne bi dodao još malo boje?
 
Odgovor na temu

erc kragujevac
Radomir Brzakovic
Focal point for SAP

Član broj: 30491
Poruke: 144
*.static.isp.telekom.rs.



+2 Profil

icon Re: kako izabrati sliku29.12.2010. u 15:42 - pre 162 meseci
gde mogu da procitam koji je konkretan indeks za Shape. ubi me kada sam probao sa copy past ili ne prikaze da je napunio ili napuni neki levi Shape. hvala i izvini na maltretiranju
 
Odgovor na temu

Jpeca
Predrag Jovanović
poslovni analitičar
Gowi
Pančevo

Moderator
Član broj: 25683
Poruke: 2268
194.106.170.*

Sajt: www.gowi.rs


+109 Profil

icon Re: kako izabrati sliku29.12.2010. u 16:13 - pre 162 meseci
Svi načini koje ja znam svode se na nekakvo probanje. Jedan mogući način:

1/ Na radnom listu klikneš na textbox koji želiš da popuniš slikom u gornjem levom uglu (Name Box) prikazaće se naziv tog TextBoxa.

Sad kad znaš naziv

2/ U VBE (Alt +F11) otvoriš Immediate Window (Ctrl+G)

3/ U Immediate window otkucaš
Code:
?Sheets("Kanban").Shapes.count 

pa Enter i dobićeš koliko ukupno ima oblika.

4/ Potom možeš da pronadješ imena svakog menjajući indeks (7 u ovom slučaju)
Code:
?Sheets("Kanban").Shapes(7).Name

I kad pronadješ naziv text boxa koji odgovara onom što već imaš iz koraka 1 to bi trebalo da bude taj indeks.

Umesto po indesku kolekciji shape možeš da pristupaš i po nazivu, tj. da zanemariš korake 2, 3 i 4 npr. umesto
Code:
Set Sh = Sheets("Kanban").Shapes(7) 

koristiš
Code:
Set Sh = Sheets("Kanban").Shapes("Textbox 1") 

Nije to loše Rembrante, samo što ne bi dodao još malo boje?
 
Odgovor na temu

erc kragujevac
Radomir Brzakovic
Focal point for SAP

Član broj: 30491
Poruke: 144
*.static.isp.telekom.rs.



+2 Profil

icon Re: kako izabrati sliku11.05.2011. u 10:19 - pre 157 meseci
ljudi ovo je sve super radilo,ali pre mesec dana na poslu mi je instaliran windows 7 i office 2010,a na moj zahtev vratio sam se na office 2003.
sada kada pokrenem aplikaciju i unesem broj slike koju bi trebao da prikaze javlja mi ovu gresku

System Error &H80004002 (-2147467262)
No Such Interface Supported

a onda i
Out of memory.

proverio sam kod kolege koji ima xp i 2003 i sve radi super. probao sam da vidim da se nije promenio raspored shape-a,ali naravno da ni immediate window ne radi.
Ima li neko ideju kako ovo da resim (instalirao sam ponovo office 2003, service pack 3 za office 2003 kao i jos neke stvari,ali ne pomaze).
 
Odgovor na temu

[es] :: Office :: Excel :: kako izabrati sliku

[ Pregleda: 2408 | Odgovora: 14 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.