Aktywne Wpisy

KarnetNaGlony +116
źródło: temp_file8271776857697680447
Pobierz
berito 0
źródło: temp_file5544990192459797651
PobierzSkopiuj link
Skopiuj link
źródło: temp_file8271776857697680447
Pobierz
źródło: temp_file5544990192459797651
PobierzWykop.pl
Makro ma wstawić zakładkę w miejscu kursora czy aktualnego zaznaczenia, a nazwa zakładki ma być wzięta z aktualnie zaznaczonego tekstu (o ile coś jest zaznaczone) albo z czterech pierwszych słów wiersza (gdy nic nie jest zaznaczone)
Algorytm wyobrażam sobie tak:
1. zadeklaruj zmienią NazwaZakładki
2. sprawdź czy jest coś zaznaczone
2a jeśli tak przypisz do NazwaZakładki treść zaznaczenia
2b jeśli nie przypisz do NazwaZakładki 4 pierwsze słowa z wiersza
3 przekształć NazwaZakładki na mozliwoą nazwę zakładki - nie może zawierać spacji i nie może zaczynać się od cyfr
- preferowana nazwa dla mnie byłby to jeden ciąg znaków gdzie pierwsze znaki każdego słowa byłby dużą literą np. "To jest zakładka" -> ToJestZakładka
- o ile osiągnięcie preferowanej nazwy zakładki jest niemożliwe to podmieniłbym spację w zmiennej NazwaZakładki na "" czyli "To jest zakładka" -> Tojest_zakładka
4. wstaw zakładkę o nazwie NazwaZakładki w miejscu kursora czy zaznaczenia.
Żeby nie było że nic nie robię ;)
Sub WstawZakladka()' makro wstawiające zakładkę
Dim NazwaZakladki
Po dalszej męczarni ;)
Sub WstawZakladka()
' makro