EXCEL (malá písmena automaticky na VELKÁ)

Programy pro práci v kanceláři (Word, Excel, Access…=>Office)

Moderátor: Mods_senior

Uživatelský avatar
Verxes
Level 3
Level 3
Příspěvky: 512
Registrován: leden 07
Bydliště: Vadkov 20, Prachatice
Pohlaví: Nespecifikováno
Stav:
Offline

EXCEL (malá písmena automaticky na VELKÁ)

Příspěvekod Verxes » 07 dub 2008 21:51

Nadar,
chtěl bych se zeptat, jestli nevíte jak udělat v excelu toto:
Napíšu do buňky text a po opuštění buňky se změní písmena na VELKÁ (nebo nastavit nějak buňku, aby vždy vše cop do ní napíšu bylo velký), jako kdybych to psal CapsLockem..
Jde to nějak?

Dík

Reklama
Uživatelský avatar
gyga
Level 4
Level 4
Příspěvky: 1011
Registrován: únor 08
Bydliště: Kutná Hora - Malešov
Pohlaví: Muž
Stav:
Offline

Re: EXCEL (malá písmena automaticky na VELKÁ)

Příspěvekod gyga » 07 dub 2008 21:57

Já ti přesně nevím, mám open office, ale co třeba naformátovat tu buňku a zvolit kapitály v písmu (nebo něco podobnýho), moc si to nepamatuju v excelu moc nedělám, musel bych to vidět.
Lenovo Thinkpad Edge 15

Uživatelský avatar
mikel
Level 5
Level 5
Příspěvky: 2298
Registrován: květen 05
Bydliště: Karviná
Pohlaví: Muž
Stav:
Offline

Re: EXCEL (malá písmena automaticky na VELKÁ)

Příspěvekod mikel » 07 dub 2008 23:11

Možná se pletu a někdo mi to vyvrátí, ale pokud vím, tak Excel tuto funkci nepodporuje. Jediné, co mě napadá je nahrazení jednotlivých znaků pomocí ASCII kódu nebo definovaných změn pro každé písmeno (Select Case).
Znáte pravidla?
Tipy a triky ve Windows XP
Návody: HijackThis, MWAV, CCleaner (THX to mijaja)
Problémy, které chcete vyřešit pište sem do fóra. Neposílejte je emailem ani po ICQ!

Uživatelský avatar
mike007
Master Level 7.5
Master Level 7.5
Příspěvky: 5860
Registrován: srpen 07
Bydliště: Pardubice
Pohlaví: Muž
Stav:
Offline
Kontakt:

Re: EXCEL (malá písmena automaticky na VELKÁ)

Příspěvekod mike007 » 08 dub 2008 04:57

Mikel : Ale fuj, všechno jde, když se chce (umí) :wink:

Verxes : Třeba tak, jak to je v příloze?
Přílohy
pc-help_0085.xls
(22 KiB) Staženo 1347 x
Nejlepší hra je Excel!
Pravidla fóra PC-helpJak označit téma za vyřešené
»»»»»»»»»»»»»»»»»»»»»»»
UPOZORNĚNÍ - můj Skype, Soukromé zprávy či email neslouží jako tech. podpora.
Dotazy pište do fóra. Od toho tu je.

Uživatelský avatar
Verxes
Level 3
Level 3
Příspěvky: 512
Registrován: leden 07
Bydliště: Vadkov 20, Prachatice
Pohlaví: Nespecifikováno
Stav:
Offline

Re: EXCEL (malá písmena automaticky na VELKÁ)

Příspěvekod Verxes » 08 dub 2008 14:44

mike007 píše:Verxes : Třeba tak, jak to je v příloze?

Přesně tak :bigups: , jak jsi toho tedy přesně docílil??

Uživatelský avatar
mike007
Master Level 7.5
Master Level 7.5
Příspěvky: 5860
Registrován: srpen 07
Bydliště: Pardubice
Pohlaví: Muž
Stav:
Offline
Kontakt:

Re: EXCEL (malá písmena automaticky na VELKÁ)

Příspěvekod mike007 » 08 dub 2008 14:56

Klikni na záložku pravým tlačítkem myši a vyber možnost Zobrazit kód.
Tam je makro, které se o to stará.
Nejlepší hra je Excel!
Pravidla fóra PC-helpJak označit téma za vyřešené
»»»»»»»»»»»»»»»»»»»»»»»
UPOZORNĚNÍ - můj Skype, Soukromé zprávy či email neslouží jako tech. podpora.
Dotazy pište do fóra. Od toho tu je.

Jenda70
nováček
Příspěvky: 17
Registrován: duben 08
Pohlaví: Nespecifikováno
Stav:
Offline

Re: EXCEL (malá písmena automaticky na VELKÁ)

Příspěvekod Jenda70 » 08 dub 2008 15:45

Jeste jsem ti makro vylepsil, aby umelo menit velka pismena ve vice bunkach najednou. Podle me se to muze hodit, kdyz budes nakopirovavat texty pres schranku:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Integer
Application.EnableEvents = False

If Not Application.Intersect(Target, Range("A1:A10")) Is Nothing Then
For i = 1 To Target.Count
Target(i).Value = UCase(Target(i).Value)
Next
End If

Application.EnableEvents = True
End Sub

Honza :-)))

guest
Pohlaví: Nespecifikováno

Re: EXCEL (malá písmena automaticky na VELKÁ)

Příspěvekod guest » 29 bře 2016 16:51

Namísto pravé strany a UCase:

= WorksheetFunction.Proper(Target(i).Value)

nebo

= StrConv(Target(i).Value), vbProperCase)


  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • Excel - automatický export listů xls do pdf včetně pojmenování Příloha(y)
    od kalosek » 28 čer 2023 20:31 » v Kancelářské balíky
    2
    1827
    od kalosek Zobrazit poslední příspěvek
    29 čer 2023 19:39
  • Excel - z jedné tabulky automaticky vytvořené jednotlivé listy Příloha(y)
    od yanetta » 09 říj 2023 10:55 » v Kancelářské balíky
    3
    3293
    od elninoslov Zobrazit poslední příspěvek
    10 říj 2023 11:38
  • Malá sestava do 30 tisíc
    od kupjec » 20 zář 2023 21:24 » v Rady s výběrem hw a sestavením PC
    14
    2184
    od kupjec Zobrazit poslední příspěvek
    25 zář 2023 11:26
  • Výběr skříně (zakoupená je malá) Příloha(y)
    od DaveMove » 09 čer 2023 15:35 » v Problémy s hardwarem
    8
    790
    od meda2016 Zobrazit poslední příspěvek
    09 čer 2023 20:27
  • Excel a OneDrive
    od sginfo » 11 zář 2023 15:28 » v Kancelářské balíky
    16
    5985
    od mirekol Zobrazit poslední příspěvek
    20 říj 2023 08:31

Zpět na “Kancelářské balíky”

Kdo je online

Uživatelé prohlížející si toto fórum: elninoslov a 5 hostů