Srodne teme

14.04.2024. Re: Gde je Kejt? (samo pogrešni odgovori)
07.07.2002. Izdvajanje teksta
18.01.2005. Excel problem sa printanjem
11.04.2005. Hifenacija ili može drugačije?
28.04.2005. Deoba reci u RichEdit kontroli
19.05.2005. poravnanje teksta u borlandu
03.09.2005. Izmena teksta u JTextField
06.01.2006. Poravnanje komponenti u QReport?
26.07.2006. Poravnanje edit-a
26.09.2006. eclipse - pomoc oko greske u kodu

Navigacija

Brisanje liste

Lista poslednjih: 16, 32, 64, 128 poruka.

Poravnanje teksta u ćelijama

[es] :: Office :: Excel :: Poravnanje teksta u ćelijama

[ Pregleda: 2355 | Odgovora: 7 ] > FB > Twit

Autor

peradetlic2
Istočno Sarajevo, BiH

Član broj: 264702
Poruke: 37
*.team.ba.

Profil

Poravnanje teksta u ćelijama

^{08.12.2010. u 09:03 - pre 162 meseci}

Zdravo,

Imam jedan problem: Trebam tekst koji je dat dole u file-u u prilogu da poravnam, tj. da bude u svim ćelijama jednako, da počinje od početka, bez razmaka.
Imam oko 300 stranica ovakvoga teksta, pa mi treba pomoć kako da to odradim automatski.
Hvala unaprijed!

PozZ

BojanS

Prikačeni fajlovi

Proba za sređivanje poravnanja.xls - 20k

Odgovor na temu

mirko1949
Miroslav Magdić
Kragujevac

Član broj: 87134
Poruke: 216
*.dynamic.sbb.rs.

+2 Profil

Re: Poravnanje teksta u ćelijama

^{08.12.2010. u 11:17 - pre 162 meseci}

Evo ti kod koji ce ti mislim pomoci:
Sub VerticalAlignment()
With Selection
.HorizontalAlignment = xlLeft
End With
Dim oCell As Range
For Each oCell In Selection
oCell = Trim(oCell)
Next
End Sub
Potrebno je da selektujes celije u kojima sredjujes tekst (moze i kolona) i pokrenes makro. U prilogu imas tvoj primer sa dugmetom za pokretanje makroa pa pogledaj.
Pozdrav

Prikačeni fajlovi

Sređivanje poravnanja.xls - 37k

Odgovor na temu

mirko1949
Miroslav Magdić
Kragujevac

Član broj: 87134
Poruke: 216
*.dynamic.sbb.rs.

+2 Profil

Re: Poravnanje teksta u ćelijama

^{08.12.2010. u 11:22 - pre 162 meseci}

Nemoj da te buni moja greska je kod:
Sub VerticalAlignment()
Naslov za makro nije dobar (nesto sam probao pa je ostalo ovako), ali sustinski to nista ne menja. Vrsi se horizontalno poravnanje i izbacivanje praznina na pocetku teksta
Pozdrav

Odgovor na temu

peradetlic2
Istočno Sarajevo, BiH

Član broj: 264702
Poruke: 37
*.team.ba.

Profil

Re: Poravnanje teksta u ćelijama

^{08.12.2010. u 15:29 - pre 162 meseci}

Ok, hvala na ovom primjeru probaću ga, da vidim kako funkcioniše.

Evo u ovom file-u u prilogu se vidi kako sam ja to uspio uraditi na drugi način!

Hvala u svakom slučaju!

PozZ

BojanS

Prikačeni fajlovi

Proba za sređivanje poravnanja gotovo.xls - 29.5k

Odgovor na temu

peradetlic2
Istočno Sarajevo, BiH

Član broj: 264702
Poruke: 37
*.team.ba.

Profil

Re: Poravnanje teksta u ćelijama

^{08.12.2010. u 15:45 - pre 162 meseci}

Evo mene opet...

Ovaj tvoj macro radi super je, svaka čast!

Možeš li mi samo objasniti kako i gdje ubacujem onaj kod za macro?
Ja sam se snašao sa gotovim tvojim macroom, al kako ubuduće kada imam samo parče koda? Gdje ga ubacujem, to me zanima, tj. postupak?!

Hvala puno unaprijed!

BojanS

Odgovor na temu

mirko1949
Miroslav Magdić
Kragujevac

Član broj: 87134
Poruke: 216
*.dynamic.sbb.rs.

+2 Profil

Re: Poravnanje teksta u ćelijama

^{08.12.2010. u 16:50 - pre 162 meseci}

Alt+F11
Insert Module
Dobices Modul1 i tu u desnom prozoru ubacis (iskopiras) macro
Pozdrav

Odgovor na temu

Ivek33

Član broj: 66174
Poruke: 2898

+66 Profil

Re: Poravnanje teksta u ćelijama

^{09.12.2010. u 01:10 - pre 162 meseci}

Citat:

peradetlic2: Možeš li mi samo objasniti kako i gdje ubacujem onaj kod za macro?