Autor: Michał R. Hoffmann (misiek_at_uoo.univ.szczecin.pl)
Data: Thu 02 Oct 1997 - 01:28:51 MET DST
Lesnik wrote:
>
> Mam pewne zadanie do wykonania w Excelu i nie wiem jak to zrobic. Otoz
> mam dwie kolumny zawierajace dane liczbowe. W kazdej z nich znajduje
> sie 12000 liczb. Potrzebuje stworzyc kolumne C zawierajaca dane z
> kolumn A i B wedlug ukladu: w pierwszym wierszu kolumny C wartosc A1,
> w drugim B1, w trzecim A2 w czwartym B2, w piatym A3, szostym B3 itd.
> Prosze o wszelkie rady jak to wykonac w miare szybko (reczne
> kopiowanie ze wzgledu na ilosc danych nie wchodzi w rachube :-))
> Pozdrawiam Jacek
chodzi ci o szybkie i proste rozwiązanie? No to proste VB makro (powinno
działać w Excel 5/7:
Wstaw/Makro/Moduł
Sub xxx()
Dim i
For i = 1 To ActiveSheet.Range("D1").Value
ActiveSheet.Cells((i * 2) - 1, 3).Value = _
ActiveSheet.Cells(i, 1).Value
ActiveSheet.Cells(i * 2, 3).Value = _
ActiveSheet.Cells(i, 2).Value
Next i
End Sub
sorry, że trochę nieładnie, ale mam ustawione zawijanie po 76 kolumnie.
PS. Liczbę komórek wpisujesz w pole D1 (co widać w pętli for). Jeśli
wpiszesz tam wartość 12000, to będzie to dokładnie to, o co pytałeś.
PPS. Żeby uruchomić makro, wstaw na arkuszu gdzie masz dane przycisk
(przez zakładkę 'Rysuj') i podłącz do niego makro xxx.
HTH,
-- misiek *** IRC: nathan ICQ UIN: 3620591 | Michal R. Hoffmann *** *** <mailto:misiek_at_uoo.univ.szczecin.pl> | PO Box 41 *** *** http:// --==* chwilowo brak *==-- | 71-119 Szczecin 35 *** *** Uniwersytet Szczecinski | POLAND *** *** -=member of ZUKiH=- -=the KNM Member=- | *** -------------------- I know I'm my best friend --------------------
To archiwum zostało wygenerowane przez hypermail 2.1.7 : Tue 18 May 2004 - 16:26:09 MET DST