Jak usunąć kursor w polu tekstowym Excel VBA

Visual Basic for Applications, czyli VBA, to język programowania dołączony do programu Microsoft Excel 2010, który pozwala na pisanie kodu umożliwiającego manipulowanie arkuszem kalkulacyjnym. VBA może między innymi sprawić, że na ekranie, przed arkuszem kalkulacyjnym, pojawi się pole tekstowe. To pole może zawierać komunikat dla użytkowników, ale mogą oni również wpisywać tekst do tego pola, jeśli mają taką potrzebę. Domyślnie pole jest wyświetlane z migającym kursorem, niezależnie od tego, czy w polu znajduje się tekst, czy nie, i nie ma możliwości zmiany tego ustawienia. Można jednak utworzyć inne ukryte pole tekstowe w konsoli VBA i przesunąć fokus na to pole, dzięki czemu będzie się ono wyświetlało tak, jakby kursora już tam nie było.

• Visual Basic for Applications, czyli VBA, to język programowania dołączony do programu Microsoft Excel 2010, który pozwala na pisanie kodu umożliwiającego manipulowanie arkuszem kalkulacyjnym.
  
• Domyślnie pole jest wyświetlane z migającym kursorem, niezależnie od tego, czy w polu znajduje się tekst, czy nie, i nie ma ustawienia, aby to zmienić.

Otwórz plik programu Excel 2010, z którym chcesz pracować. Naciśnij klawisze "Alt" i "F11". Konsola VBA otworzy się w osobnym oknie.

Wybierz Userform, który przechowuje twoje pole tekstowe, z listy elementów po lewej stronie konsoli VBA. Kliknij dwukrotnie formularz użytkownika, aby pojawił się w dużej białej przestrzeni po prawej stronie konsoli.

Kliknij formularz użytkownika po prawej stronie konsoli. Przesuń kursor na środek dolnej części pola. Kliknij i przytrzymaj przycisk myszy, a następnie przeciągnij dolną część pola w dół o około cal na ekranie, dzięki czemu pole stanie się nieco większe. Zwolnij przycisk myszy.

Kliknij menu "Widok" na górze ekranu. Wybierz "Toolbox" z rozwijanego menu. Kliknij ikonę pola tekstowego w oknie narzędziowym. Jest to trzecia ikona od lewej w górnym rzędzie i jest oznaczona jako "ab". Następnie kliknij w dowolnym miejscu w obszarze dodanego pola tekstowego, a pojawi się małe pole tekstowe.

• Wybierz formularz użytkownika, w którym znajduje się pole tekstowe, z listy elementów po lewej stronie konsoli VBA.
  
• Kliknij menu "Widok" u góry ekranu.

Spójrz na lewą stronę okna konsoli VBA i znajdź pole "Nazwa" pod nagłówkiem "Właściwości". Jeśli jest to tylko drugie pole tekstowe w projekcie, pole nazwy będzie brzmiało "TextBox2". Jeśli jednak w projekcie były inne pola tekstowe, będziesz musiał zapisać nazwę, ponieważ będzie ona potrzebna później.

• Spójrz na lewą stronę okna konsoli VBA i znajdź pole "Name" pod nagłówkiem "Properties".
  
• Jeśli jednak w projekcie były inne pola tekstowe, będziesz musiał zapisać nazwę, ponieważ będzie ona potrzebna później.

Zamknij przybornik i ponownie wybierz formularz użytkownika. Przesuń mysz na środek dolnej części formularza i przeciągnij ją do góry, ukrywając nowe pole tekstowe.

Kliknij prawym przyciskiem myszy na formularzu użytkownika na liście po lewej stronie konsoli. Wybierz opcję "Wyświetl kod". Kliknij białą przestrzeń po prawej stronie ekranu, aby umieścić tam swój kursor. W to miejsce wpisz następujący kod:

Private Sub UserForm_Activate()

 TextBox2.SetFoucus 

End Sub

Zmień nazwę "TextBox2" na taką, jaką Excel przypisał nowo utworzonemu polu tekstowemu.

Zamknij konsolę VBA programu Excel, klikając znak "X" w prawym górnym rogu okna. Po uruchomieniu makra VBA w celu wyświetlenia pola tekstowego kursor nie będzie się już pojawiał.