< návrat zpět

MS Excel


Téma: Nájsť správne číslo a dosadiť novú hodnotu rss

Zaslal/a 4.9.2019 22:52

Ahojte.

Prosím Vás potreboval by som pomôcť s vytvorením makra.
Prikladám súbor v ktorom sú dva listy "ZOZNAM" a "NOVE CENY".

"ZOZNAM" - v tomto liste sú/ budú nejaké počiatočné dáta nasekané ručne, konkrétne ARTIKEL a jeho CENA

"NOVE CENY" - v tomto liste sú tiež ARTIKLE ale už s novými cenami, ktoré už ale nemusia byť v rovnakom poradí ako na liste "ZOZNAM" a nemusia tam byť ani úplne všetky artikle. Vypíšu sa tam iba tie artikle pri ktorých sa bude meniť cena.

Ja by som potreboval makro ktoré po stlačení buttona vyhľadá artikle z listu "NOVE CENY" a nahradí pôvodné ceny novými v liste "ZOZNAM".

Potrebujem vyriešiť problém hromadného veľkého precenenie vybraných artiklov. Rozsah v ktorom sa pohybujem je cca. 500 riadkov a 20 stĺpcov.

Dúfam, že som to opísal zrozumiteľne a keď nie tak @elninoslov to určite pochopí :)

Ďakujem.

Příloha: zip44149_kopirovanie-buniek.zip (18kB, staženo 20x)
Zaslat odpověď >

Strana:  « předchozí  1 2
#044268
avatar

elninoslov napsal/a:

Urobil som Vám tam radšej aj kompletný popis makra.Příloha: 44183_skopiruj-nove-ceny2popis.zip (45kB, staženo 9x)


Zdravím Vás Pane.

Chcel by som Vás poprosiť ešte o radu.
Veľmi ste mi pomohli s vyššie uvedeným problémom.

Snažím sa ešte doplniť do toho Vášho makra to, že keď prebehne prepis starých cien za nové, tak sa hneď aj do tých buniek vloží komentár v ktorom sa zapíše aktuálny dátum, kedy prebehlo precenenie daného artiklu a ceny.

Našiel som takéto makro, ktoré funguje, ale nedarí sa mi to dosadiť do Vášho makra. Vedeli by ste mi prosím pomôcť ?

Ďakujem.

Sub DatedComment()

Dim pComment As Comment
Dim WorkRng As Range
Set WorkRng = Application.ActiveCell
Set pComment = WorkRng.AddComment(Application.UserName & ":" & vbLf & Now & vbLf)
pComment.Shape.TextFrame.Characters(1, VBA.Len(Application.UserName) + 1).Font.Bold = True

End Subcitovat
#044269
elninoslov
Je už veľa hodín, tak pridám len kód, a logické veci, čo môžu nastať, nechám na zajtra. Napr. Čo s komentárom, ak sa bunka neaktualizuje, má sa mazať komentár? Alebo ak tam už je, má sa prepísať, alebo sa má text pripísať ...?
Příloha: zip44269_skopiruj-nove-ceny2popis.zip (51kB, staženo 18x)
citovat
#044270
avatar

elninoslov napsal/a:

Je už veľa hodín, tak pridám len kód, a logické veci, čo môžu nastať, nechám na zajtra. Napr. Čo s komentárom, ak sa bunka neaktualizuje, má sa mazať komentár? Alebo ak tam už je, má sa prepísať, alebo sa má text pripísať ...?Příloha: 44269_skopiruj-nove-ceny2popis.zip (51kB, staženo 1x)


Už teraz to funguje tak ako som si predstavoval 1

- Keď sa zmení cena a komentár v bunke nie je, tak sa komentár vytvorí s aktuálnym dátumom.
- Keď sa zmení cena a komentár už v bunke je, tak sa prepíše aj komentár s aktuálnym dátumom.
- Keď sa cena nezmení, tak sa nezmení ani komentár, ale zostáva stále prítomný s dátumom posledného precenenia.

Takže to funguje 1 ĎAKUJEM.

Šlo by toto spraviť aj keď sa cena prepíše RUČNE na liste DATA - NO resp. "wsAktualne" ? Samozrejme iba v bunkách AKTULNYCH CIEN.

Lebo nie vždy sa bude používať modul pre hromadné precenenie. Ľudský faktor, keď sa v nejakom skrate rozhodne, môže zmeniť ceny aj ručne 1citovat
#044271
elninoslov
Tak skúste toto. Má to ale háčik. Nemôžete kontrolovať či ste iba vstúpil do bunky a potvrdil (nezmenil) hodnotu, alebo ste zadal inú. Museli by sa niekde kvôli tomu ukladať všetky hodnoty (skrytý list). Čiže Vám to tam pridá/zmení vždy.
Příloha: zip44271_skopiruj-nove-ceny2popis.zip (55kB, staženo 21x)
citovat
#044298
avatar

elninoslov napsal/a:

Tak skúste toto. Má to ale háčik. Nemôžete kontrolovať či ste iba vstúpil do bunky a potvrdil (nezmenil) hodnotu, alebo ste zadal inú. Museli by sa niekde kvôli tomu ukladať všetky hodnoty (skrytý list). Čiže Vám to tam pridá/zmení vždy.Příloha: 44271_skopiruj-nove-ceny2popis.zip (55kB, staženo 5x)


Ďakujem.
Myslím, že to takto funguje dobre.
Do konkrétnych buniek budú vstupovať iba keď bude zmena.

Ešte raz ďakujem za pomoc 1citovat
#044300
avatar

elninoslov napsal/a:

Tak skúste toto. Má to ale háčik. Nemôžete kontrolovať či ste iba vstúpil do bunky a potvrdil (nezmenil) hodnotu, alebo ste zadal inú. Museli by sa niekde kvôli tomu ukladať všetky hodnoty (skrytý list). Čiže Vám to tam pridá/zmení vždy.Příloha: 44271_skopiruj-nove-ceny2popis.zip (55kB, staženo 6x)


Zdravím Vás.
Nerád Vás znovu otravujem.

Narazil som na jeden problém.
Keď do listu "DATA - NO" nakopírujem úplne iný a nový zoznam artiklov tak mi vyhodí chybovú hlášku error 457 a odkáže ma jeden riadok kódu.

Dalo by sa to nejako ošetriť, že keď tam nakopírujem úplne nový zoznam artiklov tak to bude fungovať rovnako ako pred tým ?

Predpokladám, že makro si pamätá pôvodný zoznam artiklov a nový už nechce akceptovať.

Ďakujem Vám.
Příloha: jpg44300_chybovy-riadok-kodu.jpg (54kB, staženo 20x)
44300_chybovy-riadok-kodu.jpg
citovat
#044301
avatar
ešte error
Příloha: jpg44301_error-457.jpg (35kB, staženo 20x)
44301_error-457.jpg
citovat
#044302
avatar
Asi som už na to prišiel.
V niektorých riadkoch prvého stĺpca som mal zadanú hodnotu "1".
Keď som to vymazal, tak to zrazu fungovalocitovat

Strana:  « předchozí  1 2

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje