MAKRO do excelu

From: Kristian Angyal <kristian (zavinac)>
Date: 26. 04. 2005, 09:23 CEST
Vystrihni, vloz do makier, uprav hodnoty harok(X) a pocet riadkov posunu
a nastav sa na bunku v harku cislo jedna vpravo od prvej bunky s hladanym
retazcom....................
'----------------------------------cut
----------------------------------------------------------
Sub hledej_smudlo()
'rob dovdety kym nebude vedla teba nalavo prazdna bunka
DO until Activecell.offset(0,-1) = ""
' co ideme hladat ....
mykey = activecell.offset(0,-1)
'vyhladaj v harku "X" (dopln meno harku) hodnotu myKey  
Set foundcell = Worksheets("X").cells.Find(mykey)
If foundcell Is Nothing Then
' nic sme nenasli :-(
 ActiveCell = "not found"   
Else
pocet_riadkov_posunu = 3 ' tu zadas o kolko riadkov sa ma posunut
ActiveCell = foundcell.Offset(0, pocet_riadkov_posunu)
End If
'posun sa riadok nizsie a hladaj odznova
ActiveCell.Offset(1, 0).Select
loop
End Sub
'------------------------------------- end cut
----------------------------------------------------
On 4/25/05, Kristian Angyal <kristian@rebus.sk> wrote:
> Ok..skusim graficky...
> 
> ZOSIT A
> 
> Mena su A20 a A21
> Nezname ciselne hodnoty su B20 a B21
> 
> --------------
> jozef | ? |
> --------------
> juraj | ? |
> --------------
> 
> ZOSIT B
> 
> Jozef sa tu nachadza na bunke G44 a jeho prislusna hodnota na K44
> -------------
> Jozef | 55 |
> -------------
> 
> Juraj sa tu nachadza na R289 a jeho prislusna hodnota na Z289
> -------------
> Juraj | 65 |
> -------------
> 
> Chcem nacitat hodnoty zo zositu B, do zositu A, presnejsie chcem nacitam
aku
> ma hodnotu jozef v zosite B a tu hodnotu vlozit do Acka na miesto
otaznika.
> Co ma makro robit? Na bunke B20 sa ma spustit, vyhladat v ZOSITE B bunku s
> obsahom JOZEF, nacitat hodnotu prislusnu pre jozefa ktora je o niekolko
> stplcov a riadkov inde (o kolko to chcem urcit ja v makre) a vratit
nacitanu
> hodnotu do bunky B20..alebo C20 to je jedno..proste prenos zo zositu B do
> zositu A.
> Chap ma, mne tu ide o principialne fungovanie ,ked to nebude makro ale
nieco
> ine, je mi to jedno.
> 
> Este raz upozornuje , ze nemoze vzniknut duplicita a tym padom problem s
> hladanim, z kadeho mena je LEN raz v kazdom zosite.
> Malo by vediet hladat aj v riadkoch aj v stlpcoch.
> 
> 
> >
> > este upresni veci v uvodzovkach
> > a mame zadanie.
> > pochopil som to spravne?
> >
> > On 4/25/05, Kristian Angyal <kristian@rebus.sk> wrote:
> > > Ja sa na to divam funkcne, nie programatorsky, nikdy so
> > neprogramoval...no
> > > fakt neviem, co je az take absurdne na tom, ze mam dva harky alebo
> > zosity, a
> > > chcem preniest data z jedneho na druhy resp. opacne.
> > > Ku kazdej polozke v zosite alebo harku 1 existuje nejaky ekvivalent na
> > harku
> > > alebo zosite 2. Kedze harok 2 ma ine uspriadanie poloziek ako harok
> > jedna (a
> > > neda sa popisat systematicky, proste ma neekvivalentnu, chaoticku
> > > strukturu), treba ten par najst na zaklade podobnosti obsahu dvoch
> > buniek,
> > > po jednej z kazdeho harku. Jasne ze by som tu nemudroval s makrom keby
> > to
> > > bolo len o nalinkovani buniek medzi sebou. Alebo pochybujem o tom ze
sa
> > da
> > > bez makra riesit hladanie a posuvanie sa po harku 2 hore dole.
> > > Len preto som mal uvahu, ze sa na to bude dat urobit makro.
> > >
> > >
> > > > -----Original Message-----
> > > > From: AleX [mailto:faklabrejle@gmail.com]
> > > > Sent: Monday, April 25, 2005 4:21 PM
> > > > To: servis-internet@nawebu.cz
> > > > Subject: Re: MAKRO do excelu
> > > >
> > > > Cau Kristian,
> > > > teraz sa prosim neuraz ...
> > > > programujes v nejakom inom Jazyku?
> > > > tvoje zadanie sa posuva smerom k absurdite ....
> > > > teraz zabudni na makra a skus presne povedat co vlasne chces robit.
> > > > Ci uz s makrom alebo bez. Teda co ma byt vysledkom.
> > > > Nema zmysel tu teoretizovat ... vo vba sa da naozaj vela ale robit
> > > > makra pre 100 buniek sa mi zda chore ... aj ked aj to sa da napisat
> > > > (teda vygenerovanie tych makier) ale ako si povedal nechces nic na
> > > > tacke, takze povedz co presne chces a ostatni popripade aj ja ti
dame
> > > > zopar hintov popripade par subrutin ....s vysvetlenim
> > > > urcite budu tie hodnoty ktore budes hladat vo viacerych stlpcoch...
> > > > osobne som proti pisaniu makier ked ma excel na to vstavane fcie...
> > > >
> > > >
> > > > On 4/25/05, Kristian Angyal <kristian@rebus.sk> wrote:
> > > > > Ak je to pomerne jednoduche, radsej by som rad vedel metodiku ako
> > urobit
> > > > to
> > > > > makro, nez ho len dostat na tacke a nechapat. Alebo mat sablonu
toho
> > > > makra a
> > > > > iba si ho modifikovat podla toho co a kde  ma hladat.
> > > > > Este blbost zmojej strany, pomyli som si riadky zo stlpcami. Cize
> > > > priklad ma
> > > > > zniet
> > > > >
> > > > > " Vyhlada v harku2 nejaky konkretny string znakov a najde ich v
> > nejakej
> > > > > bunke, dajme tomu to najde na B15, posunie sa potom o zopar
> > > > > buniek (o kolko to zadam ja v makre priamo) doprava na E15 a
nacita
> > > > ciselnu
> > > > > hodnotu, a vrati ju do harku1 na nejaku bunku c5 na ktoru bude to
> > makro
> > > > > viazane."
> > > > >
> > > > > Moze byt vobec makro viazane na nejaku konrektnu bunku? Cize by
som
> > mal
> > > > sto
> > > > > relevantnych buniek a sto makier?
> > > > >
> > > > > Nizsie tuto komentarmi uvadzam spresnujuce informacie.
> > > > >
> > > > >
> > > > > > -----Original Message-----
> > > > > > From: MilanK [mailto:milan@kev.sk]
> > > > > > Sent: Monday, April 25, 2005 3:12 PM
> > > > > > To: servis-internet@nawebu.cz
> > > > > > Subject: Re: MAKRO do excelu
> > > > > >
> > > > > > > Da sa to vobec naprogramovat?
> > > > > >
> > > > > > Ano, da... Keby sa ozval Alexx, tak ti to spichne za par minut,
> > > > > > a mozno to skusim aj ja :-)
> > > > > >
> > > > > > > Vyhlada v harku2 nejaky konkretny string znakov v nejakej
> > > > > > > bunke, dajme tomu to najde na B15, posunie sa potom o zopar
> > > > > > > buniek doprava na B18 nacita ciselnu hodnotu
> > > > > >
> > > > > > - Kde na harku2 sa ma hladat? Na celom sheete - t.j. vsetky
> > > > > > stlpce a vsetky riadky?
> > > > >
> > > > > Ma sa hladat na celom sheete
> > > > >
> > > > >
> > > > > > - Zadany string - to je stale ten isty retazec, alebo potrebujes
> > > > > > aby sa naneho makro najprv opytalo - ze ho zadas do dialogoveho
> > > > > > okna?
> > > > >
> > > > > Napevno zadany priamo v makre, nema sa nic pytat
> > > > >
> > > > > > - Moze sa ten string na harku vyskytovat viackrat? Neviem ako
> > > > > > riesit, keby si povedal ze ano a teba zaujima az ten druhy
(dalsi)
> > > > > > vyskyt :-(
> > > > >
> > > > > nebude sa vyskytovat nikdy dvakrat, takze ani nemoze vzniknut
> > konflikt a
> > > > > preto ho ani netreba osetrit
> > > > >
> > > > > > - posun o par buniek dolava / doprava / hore / dole od najdenej
> > > > > > bunky uz nie je ziadny problem, takisto ako zobrat obsah tej
> > > > > > bunky do premennej - snad... :-) . Co by bolo obsahom tej bunky?
> > > > > > Cislo? Text? Velmi dlhy text?
> > > > >
> > > > > Cislo
> > > > >
> > > > >
> > > > > > > a tuto zapise do harku1 niekam.
> > > > > >
> > > > > > Aky je vztah medzi nazvami buniek?
> > > > >
> > > > > Ziadny medzi nimi nie je.
> > > > >
> > > > > > - Ak su stale rovnake = ziadny problem
> > > > > > - Ak je nazov harku1 odvodeny od harku2, sposobom ze je k jeho
> > > > > > nazvu pridany nejaky retazec = tiez ziadny problem (napr.
zoznam1
> > > > > > => zoznam1sum). Opacny pripad - skrateny o nieco - riesit neviem
> > > > > > (nehovorim ze sa neda...)
> > > > >
> > > > > nazvy harkov spolu nesuvisia, su voci sebe irelevatne.
> > > > >
> > > > > >
> > > > > > MilanK
> > > > > >
> > > > > >
> > > > > >
> > > > > > ===================================================== reklama
> > =====
> > > > > > Firemni bankovnictvi
> > > > > > Kdo vam pujci, kdo povede nejlevneji ucet?
> > > > > > http://firmy.mesec.cz/
> > > > > >
> > ===================================================================
> > > > > >
> > > > > > --
> > > > > > -- Konference: SERVIS ------ Pravidla: http://pravidla.kab.cz/
--
> > > > > > -- Archiv, instrukce pro odhlaseni: http://internet.nawebu.cz/
--
> > > > > > -- Konference Internet Info, s.r.o. ----- http://www.iinfo.cz/
--
> > > > >
> > > > > ===================================================== reklama
=====
> > > > > Firemni bankovnictvi
> > > > > Kdo vam pujci, kdo povede nejlevneji ucet?
> > > > > http://firmy.mesec.cz/
> > > > >
===================================================================
> > > > >
> > > > > --
> > > > > -- Konference: SERVIS ------ Pravidla: http://pravidla.kab.cz/ --
> > > > > -- Archiv, instrukce pro odhlaseni: http://internet.nawebu.cz/ --
> > > > > -- Konference Internet Info, s.r.o. ----- http://www.iinfo.cz/ --
> > > > >
> > > > >
> > > >
> > > >
> > > > --
> > > > AleX
> > > >
> > > >
> > > > ===================================================== reklama =====
> > > > Firemni bankovnictvi
> > > > Kdo vam pujci, kdo povede nejlevneji ucet?
> > > > http://firmy.mesec.cz/
> > > > ===================================================================
> > > >
> > > > --
> > > > -- Konference: SERVIS ------ Pravidla: http://pravidla.kab.cz/ --
> > > > -- Archiv, instrukce pro odhlaseni: http://internet.nawebu.cz/ --
> > > > -- Konference Internet Info, s.r.o. ----- http://www.iinfo.cz/ --
> > >
> > >
> >
> >
> > --
> > AleX
> 


-- 
AleX
Received on Tue, 26 Apr 2005 09:23:37 +0200

This archive was generated by hypermail 2.1.8 : 26. 04. 2005, 09:23 CEST