Tomasz K.

Tomasz K. Każdy z nas powinien
zdać w życiu egzamin
z bycia człowie...

Temat: Jak wykonać drobną zmianę w kodzie?

Mam krótki kod kopiujący kolumny. Chodzi o to, że chcąc kopiować kolejne kolumny z plików, dane VBA wkleja dane zaczynając zawsze od komórki A2, usuwając poprzednie kopiowanie. Jak zmienić w kodzie, żeby kopiował do kolejnej, pierwszej wolnej kolumny?
Sławomir Broda

Sławomir Broda VBA, Excel, Access,
SAP i wszystko
związane z
automatyzac...

Temat: Jak wykonać drobną zmianę w kodzie?

Tomasz K.:
Mam krótki kod kopiujący kolumny. Chodzi o to, że chcąc kopiować kolejne kolumny z plików, dane VBA wkleja dane zaczynając zawsze od komórki A2, usuwając poprzednie kopiowanie. Jak zmienić w kodzie, żeby kopiował do kolejnej, pierwszej wolnej kolumny?
Kawałek kodu by się przydał.
Tomasz K.

Tomasz K. Każdy z nas powinien
zdać w życiu egzamin
z bycia człowie...

Temat: Jak wykonać drobną zmianę w kodzie?

To jest kod nagrywany. Pewnie można go skrócić. Jest jeszcze jedna sprawa, żeby makro z kolumny "B" tj. data, nazwa kolumny: <DTYYYYMMDD>, kopiowało tylko zakres danych z okresu od 2005-09-01 do 2013-11-22, zakres danych z kolumny "F" nazwa: <close>.

Makro4 Makro
'

'
ActiveWindow.SmallScroll Down:=78
ActiveWindow.ScrollRow = 94
ActiveWindow.ScrollRow = 118
ActiveWindow.ScrollRow = 141
ActiveWindow.ScrollRow = 172
ActiveWindow.ScrollRow = 211
ActiveWindow.ScrollRow = 234
ActiveWindow.ScrollRow = 265
ActiveWindow.ScrollRow = 296
ActiveWindow.ScrollRow = 327
ActiveWindow.ScrollRow = 358
ActiveWindow.ScrollRow = 382
ActiveWindow.ScrollRow = 405
ActiveWindow.ScrollRow = 428
ActiveWindow.ScrollRow = 452
ActiveWindow.ScrollRow = 475
ActiveWindow.ScrollRow = 498
ActiveWindow.ScrollRow = 529
ActiveWindow.ScrollRow = 553
ActiveWindow.ScrollRow = 576
ActiveWindow.ScrollRow = 599
ActiveWindow.ScrollRow = 623
ActiveWindow.ScrollRow = 646
ActiveWindow.ScrollRow = 669
ActiveWindow.ScrollRow = 693
ActiveWindow.ScrollRow = 716
ActiveWindow.ScrollRow = 739
ActiveWindow.ScrollRow = 763
ActiveWindow.ScrollRow = 778
ActiveWindow.ScrollRow = 794
ActiveWindow.ScrollRow = 809
ActiveWindow.ScrollRow = 825
ActiveWindow.ScrollRow = 848
ActiveWindow.ScrollRow = 864
ActiveWindow.ScrollRow = 879
ActiveWindow.ScrollRow = 895
ActiveWindow.ScrollRow = 918
ActiveWindow.ScrollRow = 934
ActiveWindow.ScrollRow = 949
ActiveWindow.ScrollRow = 965
ActiveWindow.ScrollRow = 980
ActiveWindow.ScrollRow = 988
ActiveWindow.ScrollRow = 1004
ActiveWindow.ScrollRow = 1027
ActiveWindow.ScrollRow = 1035
ActiveWindow.ScrollRow = 1042
ActiveWindow.ScrollRow = 1050
ActiveWindow.ScrollRow = 1058
ActiveWindow.ScrollRow = 1066
ActiveWindow.ScrollRow = 1073
ActiveWindow.ScrollRow = 1081
ActiveWindow.ScrollRow = 1089
ActiveWindow.ScrollRow = 1097
ActiveWindow.ScrollRow = 1105
ActiveWindow.ScrollRow = 1112
ActiveWindow.ScrollRow = 1120
ActiveWindow.ScrollRow = 1128
ActiveWindow.ScrollRow = 1136
ActiveWindow.ScrollRow = 1143
ActiveWindow.ScrollRow = 1151
ActiveWindow.ScrollRow = 1159
ActiveWindow.ScrollRow = 1167
ActiveWindow.ScrollRow = 1174
ActiveWindow.ScrollRow = 1182
ActiveWindow.ScrollRow = 1190
ActiveWindow.ScrollRow = 1198
ActiveWindow.ScrollRow = 1206
ActiveWindow.ScrollRow = 1213
ActiveWindow.ScrollRow = 1221
ActiveWindow.ScrollRow = 1229
ActiveWindow.ScrollRow = 1237
ActiveWindow.ScrollRow = 1244
ActiveWindow.ScrollRow = 1252
ActiveWindow.ScrollRow = 1260
ActiveWindow.ScrollRow = 1268
ActiveWindow.ScrollRow = 1276
ActiveWindow.ScrollRow = 1283
ActiveWindow.ScrollRow = 1291
ActiveWindow.ScrollRow = 1299
ActiveWindow.ScrollRow = 1307
ActiveWindow.ScrollRow = 1314
ActiveWindow.ScrollRow = 1322
ActiveWindow.ScrollRow = 1330
ActiveWindow.ScrollRow = 1338
ActiveWindow.ScrollRow = 1345
ActiveWindow.ScrollRow = 1353
ActiveWindow.ScrollRow = 1361
ActiveWindow.ScrollRow = 1369
ActiveWindow.ScrollRow = 1377
ActiveWindow.ScrollRow = 1384
ActiveWindow.ScrollRow = 1392
ActiveWindow.ScrollRow = 1400
ActiveWindow.ScrollRow = 1408
ActiveWindow.ScrollRow = 1415
ActiveWindow.ScrollRow = 1423
ActiveWindow.ScrollRow = 1431
ActiveWindow.ScrollRow = 1439
ActiveWindow.ScrollRow = 1446
ActiveWindow.ScrollRow = 1462
ActiveWindow.ScrollRow = 1478
ActiveWindow.ScrollRow = 1485
ActiveWindow.ScrollRow = 1493
ActiveWindow.ScrollRow = 1516
ActiveWindow.ScrollRow = 1524
ActiveWindow.ScrollRow = 1540
ActiveWindow.ScrollRow = 1555
ActiveWindow.ScrollRow = 1563
ActiveWindow.ScrollRow = 1571
ActiveWindow.ScrollRow = 1579
ActiveWindow.ScrollRow = 1586
ActiveWindow.ScrollRow = 1594
ActiveWindow.ScrollRow = 1602
ActiveWindow.ScrollRow = 1610
ActiveWindow.ScrollRow = 1617
ActiveWindow.ScrollRow = 1625
ActiveWindow.ScrollRow = 1633
ActiveWindow.ScrollRow = 1641
ActiveWindow.ScrollRow = 1649
ActiveWindow.ScrollRow = 1656
ActiveWindow.ScrollRow = 1664
ActiveWindow.ScrollRow = 1672
ActiveWindow.ScrollRow = 1680
ActiveWindow.ScrollRow = 1687
ActiveWindow.ScrollRow = 1695
ActiveWindow.ScrollRow = 1703
ActiveWindow.ScrollRow = 1711
ActiveWindow.ScrollRow = 1718
ActiveWindow.ScrollRow = 1726
ActiveWindow.ScrollRow = 1734
ActiveWindow.ScrollRow = 1742
ActiveWindow.ScrollRow = 1750
ActiveWindow.ScrollRow = 1757
ActiveWindow.ScrollRow = 1765
ActiveWindow.ScrollRow = 1773
ActiveWindow.ScrollRow = 1781
ActiveWindow.ScrollRow = 1788
ActiveWindow.ScrollRow = 1796
ActiveWindow.ScrollRow = 1804
ActiveWindow.ScrollRow = 1812
ActiveWindow.ScrollRow = 1820
ActiveWindow.ScrollRow = 1827
ActiveWindow.ScrollRow = 1835
ActiveWindow.ScrollRow = 1843
ActiveWindow.ScrollRow = 1851
ActiveWindow.ScrollRow = 1858
ActiveWindow.ScrollRow = 1866
ActiveWindow.ScrollRow = 1874
ActiveWindow.ScrollRow = 1882
ActiveWindow.ScrollRow = 1889
ActiveWindow.ScrollRow = 1897
ActiveWindow.ScrollRow = 1905
ActiveWindow.ScrollRow = 1913
ActiveWindow.ScrollRow = 1921
ActiveWindow.ScrollRow = 1928
ActiveWindow.ScrollRow = 1936
ActiveWindow.ScrollRow = 1944
ActiveWindow.ScrollRow = 1952
ActiveWindow.ScrollRow = 1959
ActiveWindow.ScrollRow = 1967
ActiveWindow.ScrollRow = 1975
ActiveWindow.ScrollRow = 1983
ActiveWindow.ScrollRow = 1990
ActiveWindow.ScrollRow = 1998
ActiveWindow.ScrollRow = 2006
ActiveWindow.ScrollRow = 2014
ActiveWindow.ScrollRow = 2022
ActiveWindow.ScrollRow = 2029
ActiveWindow.ScrollRow = 2037
ActiveWindow.ScrollRow = 2045
ActiveWindow.ScrollRow = 2053
ActiveWindow.ScrollRow = 2060
ActiveWindow.ScrollRow = 2053
ActiveWindow.ScrollRow = 2045
ActiveWindow.ScrollRow = 2037
ActiveWindow.ScrollRow = 2029
ActiveWindow.ScrollRow = 2022
ActiveWindow.ScrollRow = 2014
ActiveWindow.ScrollRow = 2006
ActiveWindow.ScrollRow = 1998
ActiveWindow.ScrollRow = 1990
ActiveWindow.ScrollRow = 1983
ActiveWindow.ScrollRow = 1975
ActiveWindow.ScrollRow = 1967
ActiveWindow.ScrollRow = 1959
ActiveWindow.ScrollRow = 1952
ActiveWindow.ScrollRow = 1944
ActiveWindow.ScrollRow = 1936
ActiveWindow.ScrollRow = 1928
ActiveWindow.ScrollRow = 1921
ActiveWindow.ScrollRow = 1913
ActiveWindow.ScrollRow = 1905
ActiveWindow.ScrollRow = 1897
ActiveWindow.ScrollRow = 1889
ActiveWindow.ScrollRow = 1882
ActiveWindow.ScrollRow = 1874
ActiveWindow.ScrollRow = 1866
ActiveWindow.ScrollRow = 1858
ActiveWindow.ScrollRow = 1851
ActiveWindow.ScrollRow = 1843
ActiveWindow.ScrollRow = 1827
ActiveWindow.ScrollRow = 1820
ActiveWindow.ScrollRow = 1812
ActiveWindow.ScrollRow = 1804
ActiveWindow.ScrollRow = 1796
ActiveWindow.ScrollRow = 1788
ActiveWindow.ScrollRow = 1781
ActiveWindow.ScrollRow = 1773
ActiveWindow.ScrollRow = 1765
ActiveWindow.ScrollRow = 1757
ActiveWindow.ScrollRow = 1750
ActiveWindow.ScrollRow = 1742
ActiveWindow.ScrollRow = 1734
ActiveWindow.ScrollRow = 1718
ActiveWindow.ScrollRow = 1711
ActiveWindow.ScrollRow = 1703
ActiveWindow.ScrollRow = 1695
ActiveWindow.ScrollRow = 1687
ActiveWindow.ScrollRow = 1680
ActiveWindow.ScrollRow = 1672
ActiveWindow.ScrollRow = 1664
ActiveWindow.ScrollRow = 1656
ActiveWindow.ScrollRow = 1649
ActiveWindow.ScrollRow = 1641
ActiveWindow.ScrollRow = 1633
ActiveWindow.ScrollRow = 1625
ActiveWindow.ScrollRow = 1617
ActiveWindow.ScrollRow = 1610
ActiveWindow.ScrollRow = 1602
ActiveWindow.ScrollRow = 1594
ActiveWindow.ScrollRow = 1586
ActiveWindow.ScrollRow = 1579
ActiveWindow.ScrollRow = 1571
ActiveWindow.ScrollRow = 1563
ActiveWindow.ScrollRow = 1555
ActiveWindow.ScrollRow = 1548
ActiveWindow.ScrollRow = 1540
ActiveWindow.ScrollRow = 1532
ActiveWindow.ScrollRow = 1524
ActiveWindow.ScrollRow = 1516
ActiveWindow.ScrollRow = 1509
ActiveWindow.ScrollRow = 1501
ActiveWindow.ScrollRow = 1493
ActiveWindow.ScrollRow = 1485
ActiveWindow.ScrollRow = 1478
ActiveWindow.ScrollRow = 1470
ActiveWindow.ScrollRow = 1454
ActiveWindow.ScrollRow = 1446
ActiveWindow.ScrollRow = 1439
ActiveWindow.ScrollRow = 1431
ActiveWindow.ScrollRow = 1423
ActiveWindow.ScrollRow = 1415
ActiveWindow.ScrollRow = 1408
ActiveWindow.ScrollRow = 1400
ActiveWindow.ScrollRow = 1392
ActiveWindow.ScrollRow = 1384
ActiveWindow.ScrollRow = 1377
ActiveWindow.SmallScroll Down:=216
Range("A1599:B1599").Select
Range(Selection, Selection.End(xlDown)).Select
ActiveWindow.SmallScroll Down:=-45
ActiveWindow.ScrollRow = 3591
ActiveWindow.ScrollRow = 3568
ActiveWindow.ScrollRow = 3521
ActiveWindow.ScrollRow = 3467
ActiveWindow.ScrollRow = 3397
ActiveWindow.ScrollRow = 3350
ActiveWindow.ScrollRow = 3312
ActiveWindow.ScrollRow = 3265
ActiveWindow.ScrollRow = 3242
ActiveWindow.ScrollRow = 3211
ActiveWindow.ScrollRow = 3187
ActiveWindow.ScrollRow = 3148
ActiveWindow.ScrollRow = 3125
ActiveWindow.ScrollRow = 3102
ActiveWindow.ScrollRow = 3086
ActiveWindow.ScrollRow = 3063
ActiveWindow.ScrollRow = 3040
ActiveWindow.ScrollRow = 3024
ActiveWindow.ScrollRow = 3001
ActiveWindow.ScrollRow = 2985
ActiveWindow.ScrollRow = 2970
ActiveWindow.ScrollRow = 2954
ActiveWindow.ScrollRow = 2939
ActiveWindow.ScrollRow = 2931
ActiveWindow.ScrollRow = 2923
ActiveWindow.ScrollRow = 2915
ActiveWindow.ScrollRow = 2907
ActiveWindow.ScrollRow = 2900
ActiveWindow.ScrollRow = 2892
ActiveWindow.ScrollRow = 2884
ActiveWindow.ScrollRow = 2876
ActiveWindow.ScrollRow = 2869
ActiveWindow.ScrollRow = 2861
ActiveWindow.ScrollRow = 2853
ActiveWindow.ScrollRow = 2845
ActiveWindow.ScrollRow = 2838
ActiveWindow.ScrollRow = 2830
ActiveWindow.ScrollRow = 2822
ActiveWindow.ScrollRow = 2814
ActiveWindow.ScrollRow = 2806
ActiveWindow.ScrollRow = 2799
ActiveWindow.ScrollRow = 2791
ActiveWindow.ScrollRow = 2783
ActiveWindow.ScrollRow = 2775
ActiveWindow.ScrollRow = 2768
ActiveWindow.ScrollRow = 2760
ActiveWindow.ScrollRow = 2744
ActiveWindow.ScrollRow = 2737
ActiveWindow.ScrollRow = 2729
ActiveWindow.ScrollRow = 2721
ActiveWindow.ScrollRow = 2713
ActiveWindow.ScrollRow = 2705
ActiveWindow.ScrollRow = 2698
ActiveWindow.ScrollRow = 2690
ActiveWindow.ScrollRow = 2682
ActiveWindow.ScrollRow = 2674
ActiveWindow.ScrollRow = 2667
ActiveWindow.ScrollRow = 2659
ActiveWindow.ScrollRow = 2635
ActiveWindow.ScrollRow = 2620
ActiveWindow.ScrollRow = 2604
ActiveWindow.ScrollRow = 2589
ActiveWindow.ScrollRow = 2573
ActiveWindow.ScrollRow = 2550
ActiveWindow.ScrollRow = 2534
ActiveWindow.ScrollRow = 2519
ActiveWindow.ScrollRow = 2496
ActiveWindow.ScrollRow = 2472
ActiveWindow.ScrollRow = 2449
ActiveWindow.ScrollRow = 2426
ActiveWindow.ScrollRow = 2395
ActiveWindow.ScrollRow = 2379
ActiveWindow.ScrollRow = 2363
ActiveWindow.ScrollRow = 2340
ActiveWindow.ScrollRow = 2317
ActiveWindow.ScrollRow = 2294
ActiveWindow.ScrollRow = 2270
ActiveWindow.ScrollRow = 2247
ActiveWindow.ScrollRow = 2216
ActiveWindow.ScrollRow = 2193
ActiveWindow.ScrollRow = 2169
ActiveWindow.ScrollRow = 2154
ActiveWindow.ScrollRow = 2146
ActiveWindow.ScrollRow = 2123
ActiveWindow.ScrollRow = 2107
ActiveWindow.ScrollRow = 2091
ActiveWindow.ScrollRow = 2076
ActiveWindow.ScrollRow = 2053
ActiveWindow.ScrollRow = 2037
ActiveWindow.ScrollRow = 2022
ActiveWindow.ScrollRow = 2006
ActiveWindow.ScrollRow = 1990
ActiveWindow.ScrollRow = 1967
ActiveWindow.ScrollRow = 1959
ActiveWindow.ScrollRow = 1944
ActiveWindow.ScrollRow = 1936
ActiveWindow.ScrollRow = 1928
ActiveWindow.ScrollRow = 1921
ActiveWindow.ScrollRow = 1913
ActiveWindow.ScrollRow = 1905
ActiveWindow.ScrollRow = 1897
ActiveWindow.ScrollRow = 1889
ActiveWindow.ScrollRow = 1882
ActiveWindow.ScrollRow = 1874
ActiveWindow.ScrollRow = 1866
ActiveWindow.ScrollRow = 1858
ActiveWindow.ScrollRow = 1851
ActiveWindow.ScrollRow = 1843
ActiveWindow.ScrollRow = 1835
ActiveWindow.ScrollRow = 1827
ActiveWindow.ScrollRow = 1820
ActiveWindow.ScrollRow = 1812
ActiveWindow.ScrollRow = 1804
ActiveWindow.ScrollRow = 1796
ActiveWindow.ScrollRow = 1788
ActiveWindow.ScrollRow = 1781
ActiveWindow.ScrollRow = 1773
ActiveWindow.ScrollRow = 1765
ActiveWindow.ScrollRow = 1757
ActiveWindow.ScrollRow = 1750
ActiveWindow.ScrollRow = 1742
ActiveWindow.ScrollRow = 1734
ActiveWindow.ScrollRow = 1726
ActiveWindow.ScrollRow = 1718
ActiveWindow.ScrollRow = 1711
ActiveWindow.ScrollRow = 1695
ActiveWindow.ScrollRow = 1687
ActiveWindow.ScrollRow = 1680
ActiveWindow.ScrollRow = 1672
ActiveWindow.ScrollRow = 1664
ActiveWindow.ScrollRow = 1656
ActiveWindow.ScrollRow = 1649
ActiveWindow.ScrollRow = 1641
ActiveWindow.ScrollRow = 1633
ActiveWindow.ScrollRow = 1625
ActiveWindow.ScrollRow = 1617
ActiveWindow.ScrollRow = 1610
ActiveWindow.ScrollRow = 1602
ActiveWindow.ScrollRow = 1594
ActiveWindow.ScrollRow = 1586
ActiveWindow.ScrollRow = 1579
ActiveWindow.ScrollRow = 1571
ActiveWindow.ScrollRow = 1563
ActiveWindow.ScrollRow = 1555
ActiveWindow.ScrollRow = 1548
ActiveWindow.ScrollRow = 1540
ActiveWindow.ScrollRow = 1532
ActiveWindow.ScrollRow = 1524
ActiveWindow.ScrollRow = 1516
ActiveWindow.ScrollRow = 1509
ActiveWindow.ScrollRow = 1501
ActiveWindow.ScrollRow = 1493
ActiveWindow.ScrollRow = 1501
ActiveWindow.ScrollRow = 1509
ActiveWindow.ScrollRow = 1516
ActiveWindow.ScrollRow = 1524
ActiveWindow.ScrollRow = 1532
ActiveWindow.ScrollRow = 1540
ActiveWindow.ScrollRow = 1548
ActiveWindow.ScrollRow = 1555
ActiveWindow.ScrollRow = 1563
ActiveWindow.ScrollRow = 1571
ActiveWindow.ScrollRow = 1579
ActiveWindow.ScrollRow = 1586
Range("A1599:B3662,F1599").Select
Range("F1599").Activate
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Windows("RajdSwMikołaja.xlsx").Activate
Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
True, Transpose:=False
End Sub
Sławomir Broda

Sławomir Broda VBA, Excel, Access,
SAP i wszystko
związane z
automatyzac...

Temat: Jak wykonać drobną zmianę w kodzie?

Straszna sieczka. Nie mam pojęcia co program ma robić, ale na podstawie kodu można tak.

Sub nn()
Dim last As Long

ActiveWindow.SmallScroll Down:=216
Range("A1599:B1599").Select
Range(Selection, Selection.End(xlDown)).Select

Range("A1599:B3662,F1599").Select
Range("F1599").Activate
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Windows("RajdSwMikołaja.xlsx").Activate
last = Range("A1").End(xlDown).Row + 1
Range("A" & last).Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:=True, Transpose:=False
End Sub
Tomasz K.

Tomasz K. Każdy z nas powinien
zdać w życiu egzamin
z bycia człowie...

Temat: Jak wykonać drobną zmianę w kodzie?

Nie działa. Człowiek zrobił fajny kod, do importowania danych zapisanych w plikach excel z rozszerzeniem "mst", na których nic zbytnio nie można zrobić: http://www.excelforum.pl/viewtopic.php?t=27865&start=0. Przykładowy plik pobiera dane, tylko dla czterech spółek. Nie znam się na tym, on to zrobił przez zapisanie najpierw do txt, potem do ado. Po dodaniu kolejnych plików do folderu plikiMST, kod nie działa. Chciałbym, żeby to było prostsze, żeby dodawać dowolną ilość plików i uzyskiwać z nich dane. Nie wiem, czy to jest proste, czy musiałbym się bliżej poznać z VBA, gdybym chciał do kodu dodawać pewne kryteria, czyli pobierać dane tylko tych spółek, których średni wolumen z wybranego okresu, pomnożony przez cenę zamknięcia jest większy np. od 10000, lub te spółki, których cena <close> dzisiejsza, jest większa od ceny <close> z wybranego dnia z przeszłości. Chciałbym móc również określać okres czasu, z którego potrzebuję dane.
Sławomir Broda

Sławomir Broda VBA, Excel, Access,
SAP i wszystko
związane z
automatyzac...

Temat: Jak wykonać drobną zmianę w kodzie?

Tomasz K.:
Nie działa. Człowiek zrobił fajny kod, do importowania danych
Hmmm. "Panie mechanik, samochód mi nie jeździ. Napraw Pan."
zapisanych w plikach excel z rozszerzeniem "mst", na których nic zbytnio nie można zrobić: http://www.excelforum.pl/viewtopic.php?t=27865&start=0. Przykładowy plik pobiera dane, tylko dla czterech spółek. Nie znam się na tym, on to zrobił przez zapisanie najpierw do txt, potem do ado. Po dodaniu kolejnych plików do folderu plikiMST, kod nie działa. Chciałbym, żeby to było prostsze, żeby dodawać dowolną ilość plików i uzyskiwać z nich dane. Nie wiem, czy to jest proste, czy musiałbym się bliżej poznać z VBA, gdybym chciał do kodu dodawać pewne kryteria, czyli pobierać dane tylko tych spółek, których średni wolumen z wybranego okresu, pomnożony przez cenę zamknięcia jest większy np. od 10000, lub te spółki, których cena <close> dzisiejsza, jest większa od ceny <close> z wybranego dnia z przeszłości. Chciałbym móc również określać okres czasu, z którego potrzebuję dane.
Coś takiego to specyfikacja pod płatne zlecenie, a nie pytanie na forum.
Tomasz K.

Tomasz K. Każdy z nas powinien
zdać w życiu egzamin
z bycia człowie...

Temat: Jak wykonać drobną zmianę w kodzie?

Rozumiem. Opisałem potrzebę. Nie nalegam.

Następna dyskusja:

lista rozwijana - jak zrobić?




Wyślij zaproszenie do