• Zapisz się do newslettera, aby otrzymywać powiadomienia o nowościach na blogu
    Zapisując się, wyrażasz zgodę na przesyłanie Ci informacji o nowościach na tym blogu. Zgodę możesz w każdej chwili wycofać (szczegóły).

Wielkość liter taka, jak w zdaniu (funkcja VBA)

Czyli robimy Worda z Excela – tym razem przy pomocy VBA

W poprzednim wpisie pokazywałam formułę, którą zamieniałam pierwszą literę w komórce na wielką, a pozostałe na małe. Używałam do tego formuły. Metoda super, bo działa 🙂 Natomiast dla mnie aż się prosi o usprawnienie. Zakładam bowiem, że będę jej potrzebowała częściej niż tylko raz i nie chce mi się jej pisać za każdym razem. Wolę wpisać funkcję, która to zrobi. Niestety, jak pisałam ostatnio, Excel takiej funkcji nie posiada…

…a skoro nie posiada, to trzeba ją samodzielnie napisać w VBA! I o tym będzie dzisiejszy film.

Szkolenie on-line z Excela - więcej informacji...

A kod napisany w tym filmie to:

Function JakWZdaniu(Tekst As String)
JakWZdaniu = UCase(Left(Tekst, 1)) & LCase(Right(Tekst, Len(Tekst) - 1))
End Function

Jego logika jest dokładnie identyczna, co formuły opisanej tutaj, tylko jest to odpowiednik w VBA.

Co jest jeszcze szalenie istotne, to pamiętaj, aby zapisać plik jako plik z obsługą makr, czyli z rozszerzeniem xlsm. A jeśli chcesz, aby ta funkcja działała w każdym otwartym przez Ciebie pliku Excela – zapisz ją np. jako dodatek do Excela – pod koniec tego artykułu opisuję jak to zrobić.

I na koniec plik z gotowcem do pobrania:

MalinowyExcel_Wielkość liter taka jak w zdaniu VBA dw.xlsm

 

Spodobał Ci się ten artykuł?

Jeśli TAK, zapisz się na newsletter, aby otrzymywać powiadomienia
o o nowościach na blogu.

Zapisując się, wyrażasz zgodę na przesyłanie Ci informacji o nowościach na tym blogu. Zgodę możesz w każdej chwili wycofać (szczegóły).

Tagi , , , , , , , , , , , , .Dodaj do zakładek Link.

Dodaj komentarz

Twój adres email nie zostanie opublikowany. Pola, których wypełnienie jest wymagane, są oznaczone symbolem *