Kopiranje teksta iz worda u excell

Pomoć!

Trebam da prebacim oko 300 stranica teksta iz word-a u excell. Medjutim, ne može sve odjednom copy/paste jer sva polja gdje mi je tekst u više redova u word-u u excelu trea biti u jednom polju, a ono mi izbacuje u više kolona. Jel mi može neko dati neki savjet?
Evo tih file-ova da vidite šta mi treba...

Da li postoji neki način da ovo uradim automatski, ako pješke neću ni za mjsec dana? Ima li neki makro ili slično da to uradi?

Hvala unaprijed!


BojanS

Potpis

BojanS

Čija je ideja da prebacuješ toliki tekst iz Worda u Excel? Zašto to moraš da radiš? To je nesuvislo. Bojim se da ni Ivek tu neće moći da ti pomogne.

Onaj tko te natjerao da to radiš stvarno je čudan, no ako je potreba potreba je. "Snađi se"
Više redova u Excelu dobiješ zbog toga što su neki redovi "slomljeni" (Line break). Ovo možeš vidjeti kada klikneš na gumb za Show/Hide (obrnuto slovo P) a u dokumentu je "slomljena strelica" kao na tipki Enter.

Ne znam kompletnu koncepciju jer vidim u Word dokumentu jedno a u Excelu (ono što si kopirao vidim drugo). Ja bih probao sa FIND/REPLACE i to tako da prvo uklonim sve "slomljene redove" (ako smiješ reoblikovati text).

U Wordu
Dakle u Find ideš na Special i Manual Line break a u polje Replace staviš točku i jedan razmak. Ovim ćeš dobiti da svi slomljeni redovi se spoje jedan sa drugim a "točka-razmak" će dijeliti spojeni tekst. Potom Select All i Copy

U Excelu
Paste iz Worda, Selektiraš sve redove (mislim na brojeve redova) pa dvoklik između redova (mislim na liniju koja dijeli redove) time dobiješ da svi redovi koji su rašireni skupe se. Potom selektiraš datume i formatiraš ćelije po Date kako želiš.
Po ovome što si postavio kao attach u Excelu sada imaš dva stupca (datume i text) kao i u Wordu

Sada u Excelu imaš sve tekstove u jednom redu (jednoj ćeliji) ali sa razlikom u odnosu na Word. U ovdje nema slomljenih redova.

Ja bi se ovako snašao (ako okolnosti dozvoljavaju), možda ima još načina.
(btw: vodi računa da nemaju svi Office 2007 i ne mogu otvoriti tvoj attach *.xlsx i *.docx (pa ti je smanjena mogućnost za pomoć)




btw: pogledaj link Specijalni znakovi u Wordu

Hvala punooooooooo!

Evo sad ću da probam ovo da sredim kako si mi napisao i objasnio. Nadam se da će moći i da će biti OK, jer tekst mora biti identičan kao i wordu, tj. isti raspored redova...

Uglavnom, evo sad ću da atachujem i .doc i .xls verzije pa ako ko ima neki predlog neka pomaže..

Hvala unaprijed!

Potpis

BojanS

Evo sad sam uploadovao file-ove da se mogu otvarati i sa office 2003 paketom...

Sad je identičan tekst u oba file-a, tako da ko bude gledao vidjeće šta je u pitanju.

Generalno, to je potrebno u excellu da bi se moglo koristiti kao baza za neki dalji rad. Problem je u tome što je lektorica sve iz .xls kopirala u .doc i lektorisala (tako joj je bilo lakše) i sada je to lektorisano potrebno vratiti u excell, a toga ima oko 400 strana i to trojezična varijanta...

Haos će da mi bude ako ne bude moglo nešto automatski...

Hvala unaprijed svima koji mi pomognu!

PozZ

Potpis

BojanS

Ivek,

Sad sam sve isprobao kako si mi savjetovao.
Ovaj dio u word-u mi je OK i savršeno mi je sve jasno. Sve to i uradim i kopiram u excell.
Međutim, u excel-u moram to vratiti u "stanje" dva ili više redova, tj. onako kako je bilo u wordu prije smještanja u jedan red.
Da li u excellu vrijedi obrnuta radnja od one u wordu (zamjena ."razmak" za novi red).

Hvala unaprijed! Nadam se da ću nešto uspjeti da sredim.

Veliki PozZ

Potpis

BojanS

Probao sam u excel-u da zamjenim ."razmak" za novi red (suprotna radnja od one iz word-a) ali mi nikako ne ide...

Jel ima neki prijedlog ili savjet kako to da uradim.

U priloženom file-u pogledajte: - Kolona D-> Ćelije sa više redova -------> Treba da budu identične kao ćelije u koloni C.
Znači, treba mi pomoć da ovaj simbol ."razmak" zamjenim za novi red.

Hvala unaprijed!!!!


PozZ

Potpis

BojanS

da si dao ove detalje kao u kasnijim postovima možda ti se ne bi ni javio
Vidim osnove u Wordu si svladao, i to je napredak
Neće ići obrnutim redoslijedom na ovaj način (bar ja ne znam jer nisam do sada imao takav problem pa se nisam ni zanimao za takvo rješenje), osim da ideš ćeliju po ćeliju i sa ALT+ENTER vraćaš u prvobitno spajanje (ako ne nađeš rješenje ovo te neće zaobići, možda i nema puno takvih ćelija na 300 stranica , UPS!

Osoba koja je tražila prebacivanje teksta u Word mogla je sve obraditi u Excelu i ne bi bilo problema sada.

Možda bi netko mogao napisati Macro (ako uopće postoji mogućnost za takvo nešto) koji će pregledati ćeliju po ćeliju u određenom stupcu i poslije svake točke-razmaka napraviti prijelom. No ovo govorim napamet jer ja ne pišem Macro-e i nisam siguran da može.

Ako i može sa Macro tada će trebati smisliti drugačije spajanje i umjesto točka-zarez osmisliti neki drugačiji znak (jer u tekstu ima još točka-razmak pa bi bilo problema. (npr: X-X). Kada sam razmišljao o ovome nisam znao da treba vratiti tekst opet u redove.


btw: sačekaj možda ti se netko javi a u međuvremenu, "pljuc u dlanove" i na posao kako znaš ne gubi vrijeme

pogledaj u attachu ćelije žuto obojano kako se radi sa Alt+Enter

sorry, ali od mene toliko

Ivek, Hvala puno!!!

Znam za alt+enter, al ima užasno puno takvih ćelija... Nadam se da ću naći neko produktivno rješenje...
U svakom slučaju pomogao si mi dosta, sad samo moram da vidim da li ima neki makro za prebacivanje dva znaka u prelom...

Hvala još jednom.

Potpis

BojanS

Pre nego sto zaspem, ako vec imas Windows7/Vistu imas ga vec instaliranog.

Powershell:

$a = New-Object -comobject Excel.Application

$a.Visible = $True

$b = $a.Workbooks.Open("C:\Scripts\Test.xls")
$c = $b.Worksheets.Item(1)



To je za pocetak.
format koordinata ti je R1C1 sto bi za primer bio (63,4) ili (63,D)

$c.Cells.Item(63,4) - ti je koordinata

$c.Cells.Item(63,4).Formula - sadrzaj celije
$c.Cells.Item(63,4).EntireRow - ceo red gde se celija nalazi
$text = $c.Cells(63,4).Formula
$newtext = $text.Replace(" . - ", "`n -") - `n ti je newline u powershell-u

$b.SaveAs("C:\Scripts\Test.xls")

$a.Quit()

ovo nisam testirao, odoh da spavam.

E moj drug, kad bi ja još znao gdje trebam ubaciti ovo parče koda, šta i kako na koji način da to sredim...

Možeš li mi pomoći po tom pitanju?

Hvala unaprijed!

PozZ

Potpis

BojanS

Podrazumevam da imas Win7 ili Vistu.
Start > Accessories > Windows Powershell ISE
Paste u gornjoj trecini
i snimi videces da dobija ekstenziju .ps1
u donjoj trecini utipkaj Set-ExecutionPolicy Unrestricted

Pre nego sto pokrenis skriptu pogledaj moje komentare koje pocinju sa #
Dva nacina da pokrenus skriptu, zeleno "play" > u powershell-u, ili right klik na .ps1 i run in powershell

Hvala puno, drug!

Sad ću da probam ovo sve, a siguran sam da radi...

Samo mi još reci, koji je simbol za novi red, jel to "`n" ili neki drugi?

Uspio sam ovo i na drugi način, al nije viška probati i ovako.

Hvala puno!!!!

PozZ

Potpis

BojanS

Probao sam sve uraditi kako si mi napisao, al ne može, nisam administrator na ovom računaru.
Kući imam Xp, pa ću vidjeti da to probam kod nekoga ko ima vistu ili Win7 a da je administartor.

Hvala još jednom!

PozZ

Potpis

BojanS