Excel MAKRO - řazení tabulky

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

Moderátor: Mods_senior

Tomasxiv
nováček
Příspěvky: 1
Registrován: březen 11
Pohlaví: Muž
Stav:
Offline

Excel MAKRO - řazení tabulky

Příspěvekod Tomasxiv » 29 bře 2011 14:50

Dobrý den,
řeším pomocí makra databázi zákazníků, v jedné části tabulky jsou jména a adresy, v druhá jsou informace o počtu kontaktování, zaslaných nabídkách a podobně.
První sekce je ("A1:S" & n) druhá je ("V1:AY" & n). Oboje potřebuju řadit podle sloupce z první sekce (A1, B1 a C1). Jak to mám udělat? Teď řadím pouze první sekci, druhá nefunguje :-(

Kód: Vybrat vše

Range("A1:S" & n).Select
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, OrderCustom:=2, MatchCase:=False


Potřeboval bych něčím funkčním nahradit tento zápis, protože nemůžu řadit podle neoznačené buňky:

Kód: Vybrat vše

Range("V1:AY" & n).Select
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, OrderCustom:=2, MatchCase:=False


--- Doplnění předchozího příspěvku (29 Bře 2011 15:27) ---

abych to upresnil:
spis potrebuju oznacit bunky, kde vyjmu 2 sloupce a potom to budu radit podle A1

--- Doplnění předchozího příspěvku (29 Bře 2011 15:37) ---

Tak sem to uz vyresil zápisem:

Kód: Vybrat vše

Application.Union(Range("A1:S" & n), Range("V1:AY" & n)).Select
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, OrderCustom:=2, MatchCase:=False


--- Doplnění předchozího příspěvku (29 Bře 2011 15:40) ---

Tak nevyřešil, nelze prý řadit více výběrů, prosím pomoc :shock:

Reklama
  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • 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
    3695
    od elninoslov Zobrazit poslední příspěvek
    10 říj 2023 11:38
  • Dynamická velikost tabulky
    od Funstorm007 » 19 dub 2024 21:01 » v Kancelářské balíky
    0
    1010
    od Funstorm007 Zobrazit poslední příspěvek
    19 dub 2024 21:01
  • Součet údajů z tabulky.
    od Myerina » 30 led 2024 08:30 » v Kancelářské balíky
    2
    1225
    od Myerina Zobrazit poslední příspěvek
    30 led 2024 08:44
  • Makro pro myš Rapture Python
    od mmmartin » 27 srp 2023 15:18 » v Problémy s hardwarem
    9
    1284
    od mmmartin Zobrazit poslední příspěvek
    29 srp 2023 16:47
  • Excel a OneDrive
    od sginfo » 11 zář 2023 15:28 » v Kancelářské balíky
    16
    6918
    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: Žádní registrovaní uživatelé a 6 hostů