Štítek


vba

Makro na označení celé oblasti pod kurzorem

Pracuji s tabulkou, která má cca 500 položek, kdy se opakuje řádek dat a prázdný řádek (export ze SAPu). Jednoduchý způsob, jak se zbavit prázdných řádků je tabulku seřadit, což znamená označit celou oblast – nepřišel jsem na způsob, jak to udělat skrze klávesovou zkratku :( … tak jsem si napsal jednoduché makro B)

náhled zdrojového kódu
Sub OznacOblast()
 
 
  LastRow = Cells.Find(What:="*", SearchDirection:=xlPrevious, SearchOrder:=xlByRows).Row
  LastCol = Cells.Find(What:="*", SearchDirection:=xlPrevious, SearchOrder:=xlByColumns).Column
 
  Range(Cells(ActiveCell.Row, ActiveCell.Column), Cells(LastRow, LastCol)).Select
 
 
End Sub

Makro v Excelu pro spojení dvou tabulek

Jedna z věcí, kterou na excelu nemám rád je spojování dvou tabulek podle klíče (nelze udělat automaticky). Prakticky lze pouze pro tento účel využít vestavěnou fci excelu SVYHLEDAT(..), která spáruje a zobrazí jeden sloupec ze zdrojové tabulky. Druhou možností je vytvořit jednoduché makro B) .

číst dále

Makro v Excelu pro součet buněk dle jejich barvy

Potřeboval :) jsem sečíst buňky podle jejich barvy a jediný způsob, který mě napadl je filtrovat buňky dle barev a jako sumární vzorec použít funkci SUBTOTAL(9;A1:A5), kdy „9“ označuje typ součtu, v tomto případě SUM.

Anebo podívat se po nějakém šikovném makru ;)

číst dále

Makro v Excelu pro odstranění diakritiky

Potřeboval jsem odstranit diakritiku u cca 100 řádků excelovské tabulky (a nechtělo se mi všechny položky ručně přepisovat B) ).

číst dále