RE: MAKRO do excelu

From: Kristian Angyal <kristian (zavinac)>
Date: 26. 04. 2005, 09:23 CEST
pisal som to z ruky tak je mozne ze to nebude fachcit...
ak tak sa ozvi ...
ostatni ktori vedia co za "prasarnu" bez deklaracii atd. som napisal
sa ospravedlnujem  ;-D


On 4/25/05, AleX <faklabrejle@gmail.com> wrote:
> 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
> 


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

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