Problem with macro (find, copy, paste, loop)

cosiek

New Member
Joined
Sep 26, 2017
Messages
3
Hi,
I have excel sheet where are sth about 30 'boxes' with different date, having structure like below:


Code:
<div class="ciekaw2">
<div class="one"><a class="menu" title="Kup teraz!" href="https://www.poczytaj.pl/ksiazka/poczet-cesarzy-rzymskich-aleksander-krawczuk,20080?pp=5" rel="nofollow"><img title="Aleksander Krawczuk, Poczet cesarzowych rzymskich" src="https://www.imperiumromanum.edu.pl/wp-content/uploads/2017/08/20080.jpg" alt="Aleksander Krawczuk, Poczet cesarzowych rzymskich" width="200" height="271" /></a></div>
<div class="two">
<p style="margin: 10px 0 0 10px;">Aleksander Krawczuk</p>
<p class="ksiegarnia">Poczet cesarzy rzymskich</p>
<p class="male3">Praca autorstwa świetnego historyka i znawcy świata starożytnego zawiera sylwetki wszystkich władców epok pryncypatu i dominatu, począwszy od Juliusza Cezara, a skończywszy na Romulusie Augustulusie. Znakomitym uzupełnieniem dzieła jest Kalendarium cesarstwa rzymskiego obejmujące najważniejsze wydarzenia polityczne i militarne tego okresu. Pomoże ono czytelnikowi umiejscowić w czasie fakty przedstawione w części poświęconej sylwetkom władców, zorientować się w przebiegu walk o władzę w państwie, prześledzić rozwój terytorialny imperium i wreszcie jego upadek. Barwnie napisana książka daje pełny obraz cesarstwa rzymskiego.</p>
<p class="male31"><strong>OKAZJA!</strong> | było 75.00 zł | <strong>Dzisiaj cena: <span style="color: red;">58.50 zł</span></strong></p>
<p class="male3"><span style="color: green;"><strong>Specjalnie dla Czytelników !!!</strong></span> niższe ceny po kliknięciu w poniższy link i wpisaniu <span class="underlined">hasła do rabatu</span>: <strong>imperiumromanum</strong></p>
<p class="dalej kupteraz"><a class="menu" title="Kup teraz!" href="https://www.poczytaj.pl/ksiazka/poczet-cesarzy-rzymskich-aleksander-krawczuk,20080?pp=5" rel="nofollow">Kup teraz!</a></p>


</div>
</div>


<div class="ciekaw2">
<div class="one"><a class="menu" title="Kup teraz!" href="https://www.poczytaj.pl/ksiazka/poczet-cesarzowych-rzymu-aleksander-krawczuk,20079?pp=5" rel="nofollow"><img title="Aleksander Krawczuk, Poczet cesarzowych Rzymu" src="https://www.imperiumromanum.edu.pl/wp-content/uploads/2017/08/20079.jpg" alt="Aleksander Krawczuk, Poczet cesarzowych Rzymu" width="200" height="300" /></a></div>
<div class="two">
<p style="margin: 10px 0 0 10px;">Aleksander Krawczuk</p>
<p class="ksiegarnia">Poczet cesarzowych Rzymu</p>
<p class="male3">Książka prof. Aleksandra Krawczuka jest uzupełnieniem i odpowiednikiem Pocztu cesarzy rzymskich. W niezwykle ciekawy i barwny sposób przedstawia losy wszystkich żon cesarzy od Augusta do Teodozjusza Wielkiego, czyli od powstania cesarstwa do roku 395, kiedy nastąpił podział imperium na wschodnie i zachodnie. Autor prezentuje również sylwetki żon, które przyszli władcy poślubili jeszcze przed wstąpieniem na tron, a także kobiety będące tylko konkubinami, jeżeli ich wpływ na ówczesne wydarzenia i życie polityczne był znaczący. Jak zwykle prof. Krawczuk wzbogaca fakty historyczne licznymi anegdotami i ciekawostkami z życia oraz obyczajowości starożytnych.</p>
<p class="male31"><strong>OKAZJA!</strong> | było 42.00 zł | <strong>Dzisiaj cena: <span style="color: red;">30.55 zł</span></strong></p>
<p class="male3"><span style="color: green;"><strong>Specjalnie dla Czytelników !!!</strong></span> niższe ceny po kliknięciu w poniższy link i wpisaniu <span class="underlined">hasła do rabatu</span>: <strong>imperiumromanum</strong></p>
<p class="dalej kupteraz"><a class="menu" title="Kup teraz!" href="https://www.poczytaj.pl/ksiazka/poczet-cesarzowych-rzymu-aleksander-krawczuk,20079?pp=5" rel="nofollow">Kup teraz!</a></p>


</div>
</div>
Those have similar structure and there is more such 'blocks'.


What I want achieve is to search for string of text behind <p class="dalej kupteraz">
e.g.
Code:
<a class="menu" title="Kup teraz!" href="https://www.poczytaj.pl/ksiazka/poczet-cesarzy-rzymskich-aleksander-krawczuk,20080?pp=5" rel="nofollow">


copy it and add after <p class="ksiegarnia">, which was earlier


RESULT should be:
Code:
<p class="ksiegarnia"><a class="menu" title="Kup teraz!" href="https://www.poczytaj.pl/ksiazka/poczet-cesarzy-rzymskich-aleksander-krawczuk,20080?pp=5" rel="nofollow">Poczet cesarzy rzymskich</p>


The same should be applied, one by one in column A.


In general:
1. Macro is searching for <p class="dalej kupteraz">.
2. Value behind is copie
3. Macro is searching back for <p class="ksiegarnia">.
4. After <p class="ksiegarnia"> is pasted copied string.
5. Then macro is going to next <p class="dalej kupteraz"> and makes the loop till the end of all rows.


If there is a need I can attach the .xls file for better visibility.


I am fighting with this for 2 days and no idea whether it is possible to achieve.
Thank you for any help.
Best regards,
Cosiek
 

Excel Facts

Highlight Duplicates
Home, Conditional Formatting, Highlight Cells, Duplicate records, OK to add pink formatting to any duplicates in selected range.
Hello cosiek,

Bine ati venit pe forum!

I know very little Romanian. I did study Latin for 3 years, so that helps. Your example where you said "copy it and add it after , which was earlier" appears to me to be missing. Could you post the example again please?
 
Upvote 0

Forum statistics

Threads
1,214,649
Messages
6,120,732
Members
448,987
Latest member
marion_davis

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top