Matjazev.NET

Najlepša hvala za hiter odgovor in pomoč.
Zadevo udejanjim , če se kje zatakne se ponovno oglasim.
Lep pozdrav - Matjaz

Pozdravljeni, Izdelal sem obrazec za vnos rezultatov tekmovanja naših članov v excelovo tabelo. V obrazec je potrebno vnesti Šifro Člana, Ime in Priimek, Naslov in rezultat. Vse podatke članov imam na drugem listu . Spremenljivka so edino rezultati. Rad bi zadevo poenostavil z funkcijo vlookup . V o...

Najlepša hvala za pomoč. Resnično zelo uporaben forum , ki vedno pomaga malo manj veščim v programiranju.

Najlepša hvala za pomoč. Resnično zelo uporaben forum , ki vedno pomaga malo manj veščim v programiranju.

Pozdravljeni, Najbolj bi mi koristilo, da se kontrola naredi čez vse celice v vrstici. Dajem vam lažni občutek, da sem zelo domač v pisanju makrojev. Ni tako. Že zgornji macro sem z muko sestavil iz več prispevkov v tem forumu. kako pa naj bi izgledala vrstica z while zanko je (zame) neznanka . Hval...

Pozdravljeni, Najbolj bi mi koristilo, da se kontrola naredi čez vse celice v vrstici. Zahvaljujem se vam za hiter odgovor. Dajem vam lažni občutek, da sem zelo domač v pisanju makrojev. Ni tako. Že zgornji macro sem z muko sestavil iz več prispevkov v tem forumu. kako pa naj bi izgledala vrstica z ...

Pozdravljeni, Uporabljam makro pri katerem se kopirajo podatki iz ene vrstice lista 1 na drugi list v tabelo in sicer po pravilu vnesi podatek v naslednjo prazno vrstico v tabeli. Rad bi dosegel , da pri kopiranju podatkov (vrstice) macro preveri ali enak podatek obstaja in če obstaja le tega ne pre...

Pozdravljeni,
Zahvaljujem se za potrpežljivost. Makro počne točno to kar sem želel.
Hvala še enkrat.
Lep pozdrav - Matjaž

Na listu 1 imam obrazec v katerega vnašam podatke o artiklu. Podatek o artiklu je sestavljen iz štirih celic peta celica pa je količina. Ob kliku na stikalo makro skopira ta podatek (na list 2 v tabelo. Sheets("OBRAZEC").Select ActiveSheet.Unprotect If ActiveSheet.Range("a10").Value = "" Then Active...

Načeloma mi je postopek všeč in uporaben . Za spremembe elementov v algoritmu sem očitno prekratek . Ali pa če se vrnem k prvotnemu makroju : If ActiveSheet.Range("a10").Value = "" Then ActiveSheet.Range("A10:B10").Value = Sheets("LIST1").Range("E6:F6").Value Else ActiveSheet.Range("a42").End(xlUp)....

Pozdravljeni,
Tako sem deklariral spremenljivko tudi jaz pa sem mislil da delam narobe in res makro ni hotel delovati.
Obravnavati bi moral podatek o artiklu ki zajema 4 celice. Ali bi potemtakem moral ubrati drugačno pot ? Seveda brez vaše pomoči ne gre.
Lep pozdrav . Matjaž

Pozdravljeni,
še eno podvprašanje - Kako bi dosegel, da se spremenljivka " artikel " nanaša na range ("B6 : E6") namesto
Dim artikel As String: artikel = Range("E6")
ali pa sem mimo brcnil ?
Lep pozdrav .

Še enkrat hvala, točno to sem želel.

Pozdravljeni,
Ni teorije, da to spravim skupaj. Vas lahko prosim, da mi bolj konkretno ponazorite (napišete v obliki procedure ) vašo rešitev . Sploh ne vem kam stavek zanko while vstaviti.
Res ne bom več sitnaril

Hvala in lep pozdrav

Pozdravljeni,
Tabela (obrazec za tiskanje) se zaključi v 42 vrstici . Če mi uspe napisati proceduro z while zanko (v kar dvomimz zaradi mojega pomanjkljivega znanja ) bo 32 vrstic dovolj, ker bo enake zapise združeval .
Hvala za odgovor če mi ne rata bom spet sitnaril