» »

Excel, VBA coda

Excel, VBA coda

janez0 ::

Sheet1 zgleda nekako tako:
A B C D E
310/2 JOHN SMITH Ljubljanska 23 oranžna modra
410/6 DAVID JOHNSON Mariborska 45 modra rdeča
540/1 JOHN SMITH Ljubljanska 23 oranžna modra
410/5 DAVID JOHNSON Mariborska 45 modra rdeča
420/6 DAVID JOHNSON Mariborska 45 modra rdeča
420/7 DAVID JOHNSON Mariborska 45 modra rdeča
420/9 DAVID TAYLOR Poljanska 56 oranžna zelena

Sedaj bi rad, da mi macro prekopira podatke v Sheet2, in sicer tako:
A B C D E
310/2, 540/1 JOHN SMITH Mariborska 45 modra rdeča
410/6, 410/5, 420/6, 420/7 DAVID JOHNSON Ljubljanska 23 oranžna modra
420/9 DAVID TAYLOR Poljanska 56 oranžna zelena

Se pravi na podlagi kaj je tekst v 2 stolpcu, združi vse podatke v stoplcu 1, ostali stolpci pa so itak enaki za vsako vrednost stolpca 2, zato jih samo prekopira. Bi mi kdo znal pomagati? :)

Hvala, LP.

ERGY ::

Izbereš sheet, ki kjer so prvotni podatki.
Sheets(index).Select

Določiš kje se nahaja prvi podatek oz začetek
Range("A-Z" &index).Select

.. še dodaš eno zanko in preneseš v drugi sheet.
Ostalo si sam napiši.

prtenjam ::

Z uporabo vrtilne tabele iz seznama imen izločite smo edinstvena imena.

Ko imate seznam imen, pa uporabite MExcel za združevanje tabel in temu seznamu pridružite ostale podatke. MExcel zna namreč podatke družiti tudi v horizontali in vam bo podatke združil desno od imena.

To je tudi edina razlika glede na vašo originalno željo - podatke boste imeli na desni strani imen in ne na levi - vse kar je potrebno še storiti je torej pač prekopirati ime na desno ;)

Vse skupaj vam vzame manj kot minuto dela!
Matjaž Prtenjak
https://mnet.si


Vredno ogleda ...

TemaSporočilaOglediZadnje sporočilo
TemaSporočilaOglediZadnje sporočilo
»

Excel 2016 - kako z vlečenjem dol dobiti vrednosti istih celic iz več listov

Oddelek: Pomoč in nasveti
5472 (398) jedateruk
»

kako v excelu avtomatsko obarvati celice

Oddelek: Programska oprema
104182 (3955) smetko
»

C osnova

Oddelek: Programiranje
221544 (1059) RunoTheDog
»

Telefonski kabel za ethernet omrezje?

Oddelek: Omrežja in internet
131490 (1309) asPeteR
»

internetna stran

Oddelek: Izdelava spletišč
5903 (831) Tody

Več podobnih tem