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

Find and replace, superscript

[es] :: Office :: Excel :: Find and replace, superscript

[ Pregleda: 2963 | Odgovora: 8 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

brainless

Član broj: 98065
Poruke: 276
91.194.83.*



+13 Profil

icon Find and replace, superscript18.11.2014. u 18:37 - pre 113 meseci
Pozdrav,

video sam da ima identična tema, ali za word, meni treba za excel. Da li je moguće uraditi find&replace :

FIND WHAT: m3
REPLACE WITH:m3
 
Odgovor na temu

Ivek33

Član broj: 66174
Poruke: 2898



+66 Profil

icon Re: Find and replace, superscript19.11.2014. u 21:35 - pre 113 meseci
Citat:
brainless: FIND WHAT: m3
REPLACE WITH:m3

probaj vidjeti ovdje Find and Replace u Excelu imaš prmijer za download. Jedino ne znam iz kojeg razloga server neće prikazati sve slike na tutorijalu. Moram to vidjeti i riješiti.

A možeš vidjeti i ovdje kako preko VBA konvertirati m3
- Find and replace via VBA
 
Odgovor na temu

Jpeca
Predrag Jovanović
poslovni analitičar
Gowi
Pančevo

Moderator
Član broj: 25683
Poruke: 2267
212.200.121.*

Sajt: www.gowi.rs


+109 Profil

icon Re: Find and replace, superscript20.11.2014. u 10:59 - pre 113 meseci
Za konkretan primer problem je kako uneti superscript 3 kao karakter za zamenu umesto običnog 3.

Ako se u Replace navede formatiranje Excel će celu ćeliju formatirat sa superscript

Superscript 3 već postoji u proširenom karakter setu i možeš ga uneti u ćeliju preko Insert Symbol, pa se u ovom slučaju može primenti replace

U replace dijalogu (CTRL+H)
Find what unesi "m3"
Replace with unesi m pa paste simbola superscript 3 ili
ako je aktivirana English (United States ) tastatura superscript 3 možeš uneti sa Alt+0179 (vidi specijalni karakteri sa ALT)

Elegantije rešenje koje bi radilo i za neke slučajave gde nema odgovarajući superscript/subsript u proširenom karakter setu, bilo bi pomoću VBA preuzeto sa http://excel.tips.net/T005490_...ripts_in_Find_and_Replace.html

Code:
Sub DoConvert()
    Dim cl As Range

    For Each cl In Selection.Cells
        If cl.Value = "m3" Then
            cl.Characters(2, 1).Font.Superscript = True
        End If
    Next
End Sub

Nije to loše Rembrante, samo što ne bi dodao još malo boje?
 
Odgovor na temu

brainless

Član broj: 98065
Poruke: 276
91.194.83.*



+13 Profil

icon Re: Find and replace, superscript20.11.2014. u 13:57 - pre 113 meseci
Hvala puno! Isprobao sam sva tri načina. Nisam uspeo da nalepim m3, a sa makroom menja samo ako su u ćeliji isključivo m3,
a neće ako su npr (m3/m3).. E a ovaj treći radi, ali sam prvo ukucao "alt+ taj broj", pa sam se malo čudio što neće da radi, pa sam onda skontao da
treba da držim alt i ukucam broj. Sve u svemu hvala puno!
 
Odgovor na temu

lukarim
dado kekić
sss

Član broj: 292674
Poruke: 53
*.adsl.net.t-com.hr.



+3 Profil

icon Re: Find and replace, superscript20.11.2014. u 16:44 - pre 113 meseci
Ima jednostavnijih rješenja samo treba razmisliti.Što neki naravno ne rade već traže po planeti rješenja.Rješenja su tu preko puta u susjedstvu.Kod komšija, i uvijek pouzdana.
Iveku33 da stavi na svoj sajt, a Jpeci da razmišlja jer ima potencijala, isto tako pojedina se slova mogu podignuti ili spustiti isto tako pod uvjetima.
Prikačeni fajlovi
 
Odgovor na temu

Ivek33

Član broj: 66174
Poruke: 2898



+66 Profil

icon Re: Find and replace, superscript20.11.2014. u 22:43 - pre 113 meseci
Citat:
lukarim:Iveku33 da stavi na svoj sajt,
Interesantno rješenje "komšija". Jel smijem ove tvoje kodove staviti na moj sajt?
pozdrav
 
Odgovor na temu

lukarim
dado kekić
sss

Član broj: 292674
Poruke: 53
*.adsl.net.t-com.hr.



+3 Profil

icon Re: Find and replace, superscript21.11.2014. u 14:12 - pre 113 meseci
Kao i sve do sada Ivek, otvorene i "zatvorene". Ivek treba stvarati nove stvari iz postoječih ne prepisivati.Sve "tuđe" i otvoreno ti mora biti poticaj. Vjerovatno bi i ti znao ovo sastaviti da razmišljaš, da si u Excelu In. Po sajtu se vidi kao da jesi..............................pozdrav.
PS
Jpeca je morao znati da je riječ o brojevima vrlo logični i ubaciti koju liniju koda koja diže ili spušta brojeve. Njegov kod nije njegov nivo................
 
Odgovor na temu

Jpeca
Predrag Jovanović
poslovni analitičar
Gowi
Pančevo

Moderator
Član broj: 25683
Poruke: 2267
212.200.121.*

Sajt: www.gowi.rs


+109 Profil

icon Re: Find and replace, superscript21.11.2014. u 15:11 - pre 113 meseci
Iako ga se ne bih stideo, samo da pojasnim da kod nije moj, preuzet je sa sajta kako je navedeno i samo je prilagođen za konkretan slučaj m3


Hvala na doprinosu temi. Program koji si priložio je interesantan i siguran sam da mnogi mogu da nauče puno iz njega, a da li je dobar za konkretan problem nisam siguran, jer pokretač teme nije detaljnije opisao problem.

Šta ćemo sa slučajevima M33 ili adm37 ili East Street 4 ... ? Po meni nema smisla prebacivati sve brojeve u superscript, nego samo određene reči. To je već pitanje konkretnog problema.

Inače, kad se izbace logički uslovi, petlje suština je ista i u tvom programu:
Code:
 s.Characters(i, 1).Font.Superscript = True


Meni se čini da je to sasvim dovoljno detalja da neko kome ovo treba doda potrebnu logiku i prilagodi makro prema sopstvenim potrebama.

Kad smo već pokrenuli priču oko zamene može se zamena i ubaciti u AutoCorrect listu pa će uvek prilikom unosa m3 (kao posebna reč) da se prevede u željeni oblik - ali ovo važi samo u slučaju naknadnog, ručnog unosa.

Nije to loše Rembrante, samo što ne bi dodao još malo boje?
 
Odgovor na temu

lukarim
dado kekić
sss

Član broj: 292674
Poruke: 53
*.adsl.net.t-com.hr.



+3 Profil

icon Re: Find and replace, superscript23.11.2014. u 17:33 - pre 113 meseci
U konkretnom slučaju mjenja sve ono što je potrebno da promjeni a to je iz gore navedenog m3 i m3/m3 vrlo se jasno vidi šta treba promjeniti a tu je i m2, kemiiske formule sve. Ne treba koristiti makro da u knjizi "Ožalošćena porodica" ili Algebra za osnovnu školu podigne ili spusti sve brojeve. Osnovni je zadatak dati makrou u gore navedenim slučajevima da podiže ili spušta brojeve.
a ako se treba po posebnom obrascu mijenjati format onda postaje igra sa:
Code:

'naravno prije ovoga treba neke stvari dodati
With Application.FindFormat.Font
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
    End With
    With Application.ReplaceFormat.Font
        .FontStyle = "Regular"
        .Strikethrough = False
        .Superscript = True
        .Subscript = False
        .ColorIndex = xlAutomatic
    End With
' naravno i nakon ovoga upotrijebiti petlju da diže samo numeričke podatke

to vam ostavljam kao razbibrigu
zamislite da imate u koloni A točno poredane sve opcije sa spuštenim i podignutim slovima.
napraviti petlju da u nazovimo je šablonskoj tabeli uzima jedan po jedan pojam i da to bude Initstring ili Like i da na takav način mjenja (kopira)u potrebnom tekstu upravo to. pomoću već gore i prije navedenih makroa.....................................
pozdrav
 
Odgovor na temu

[es] :: Office :: Excel :: Find and replace, superscript

[ Pregleda: 2963 | Odgovora: 8 ] > FB > Twit

Postavi temu Odgovori

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