Excel +VBA + sortowanie kolumn = help ;)

	B O A R D
	» Board » Zadaj pytanie » Archiwum » Szukaj » Stylizacja

M E N U

» Nowości

» Archiwum

» Recenzje / Testy

» Board

» Rejestracja

Szukaj @ TwojePC

	OBECNI NA TPC
	» Wolf 00:08 » Zbyszek.J 00:06 » Mariosti 23:59 » lcf 23:51 » rainy 23:44 » Hitman 23:27 » Fl@sh 23:17 » DJopek 23:08 » petropank 23:07 » rarek 23:06 » b0b3r 22:58 » cVas 22:56 » dugi 22:51 » Dexter 22:50 » Soulburne 22:44 » stefan_nu 22:41 » Brauni 22:41 » maddog 22:39 » Kenny 22:36 » toledo 22:35 Dzisiaj przeczytano 758 postów, wczoraj 42635 Szybkie ładowanie jest: włączone.

ccc

A R C H I W A L N A W I A D O M O Ś Ć

Excel +VBA + sortowanie kolumn = help ;) , Fox 22/09/06 08:28
Powiedzmy ze mam arkusz z kolumnami
A - Nazwa B - Nr C - Ilosc D - Opis
W kolejnych wierszach sa nastepne pozycje.
Jak mam posortowac wpisy np alfabetycznie po polu A - Nazwa,
tak zeby kolumny BCD zwiazane z wierszem rowniez wylądowały na swoim miejscu, nie będąc pomieszane ?

Pozdrawiam

a po co VB ? , Delete01 22/09/06 08:32
zaznacz kolumny, Dane, Sortuj .... wybierasz kolumne A jako sortuj po.... i gotowe
zaznaczasz wszystkie 4 kolumny , Dhoine 22/09/06 08:33
MENU DANE --> SORTUJ i tam wybierasz po czym sortowac.

Ale w temacie watka dales VBA - wiec obawiam sie, ze ta metoda Cie nie zadowoli.
Chodzi o to, , Fox 22/09/06 08:37
ze to musi być automat, pani dopisuje kolejny wiersz i trza sobie posortowac i wstawic, ona nie moze nic robic zadne sortuj - dlatego sie gryzę z tym tyle ;)
Powered by Linux and siemens s7
PLCs...
no to tak ... , Delete01 22/09/06 08:38
Sheets("Arkusz").Select
Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
1. Hmm mam troszke problem z tym ;) , Fox 22/09/06 08:58
  Private Sub Worksheet_Activate()
  Sheets("Sheet2").Select
  Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlGuess, _
  OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
  DataOption1:=xlSortNormal
  End Sub
  
  Otrzymuje error 1004 Application or object error, ktory nic mi nie mowi ;)
  Powered by Linux and siemens s7
  PLCs...
Ha, zrobilem , Fox 22/09/06 10:14
Widac najprostsze metody są najlepsze, posortowałem z palca nagrywając makro ;)
Dzięki za pomoc.
Powered by Linux and siemens s7
PLCs...
1. jesli zagladniesz sobie w zrodlo tego makro , Delete01 22/09/06 11:38
  to bedzie podobnie (jak nie tak samo), byc moze chodzi o ten ostatni parametr ... rozne wersje VBA - tak mi sie zdaje.;)
  1. No tak, , Fox 22/09/06 11:58
    jest praktycznie identycznie, nie mam pojecia czemu nie kcialo chodzic, dzieki!
    Powered by Linux and siemens s7
    PLCs...