Dodaj wpis w tym temacie
Spis tematów | Strona: 1 2 ... 6 7 8 ... 53 54 Wyślij wiadomość do admina |
Przewiń wpisy ↓ | Excel- potrzebna pomoc |
2009-03-09 (16:40)![]() Data rejestracji: 2005-02-24 00:00:00 Ilość postów: 6116 ![]() | wpis nr 186 369 [ CZCIONKA MONOSPACE ] To jest jak widzę porównanie wartości w komórkach czyli jak wartość jest równa Makro nie wykonuje działania jak różna wykonuje działanie ...tak sądzę Tylko jak Makro ma określić ostatni wykonany wpis w Arkusz1 przedział \"A3:A6000\" i wykonać kopiowanie liczb z Arkusz2 o 50 wierszy wyżej niż wynosi ostatni wpis liczb w Arkusz1 \"A?\" wesołego dnia ![]() |
2009-03-09 (19:16)![]() Data rejestracji: 2006-07-21 00:00:00 Ilość postów: 2814 ![]() | wpis nr 186 423 [ CZCIONKA MONOSPACE ] Sławku, to proste operacje są, dodawanie i odejmowanie nic poza tym. Nie wiem z czym masz problem, dośc niejasno piszesz, nawet nie wiadomo czy baza leci z góry na dół czy odwrotnie, i w jakiej kolejności - najnowsze na górze czy na dole. Ale jak by nie było, porównać, i dodać albo odjąć, tylko stosuj odwołania do komórek w postaci cells(wiersz, kolumna) Pozdrawiam |
2009-03-09 (20:10)![]() Data rejestracji: 2005-02-24 00:00:00 Ilość postów: 6116 ![]() | wpis nr 186 442 [ CZCIONKA MONOSPACE ] wiem że to prosta procedura już ją raz wykonałeś jak bawiłem się Hybrydą 50 ![]() żeby było jeszcze prościej na stronie http://sufler.com.pl/slawek/ pozycja nr 2 Hybryda002 jest arkusz nad którym się mecze po otworzeniu się arkusza Odkryj Arkusze przyciskiem i w Info jest dokładnie opisane co do tej pory wykonałem a jak wykonać to nieszczęsne kopiowanie omówimy na forum wesołego wieczoru ![]() |
2009-03-09 (20:45)![]() Data rejestracji: 2006-07-21 00:00:00 Ilość postów: 2814 ![]() | wpis nr 186 448 [ CZCIONKA MONOSPACE ] Zaglądnę, ale z czasem krucho, może jutro chwilkę znajdę? Odezwę się jak mi się uda temu przyjżeć. |
2009-03-09 (21:15)![]() Data rejestracji: 2005-02-24 00:00:00 Ilość postów: 6116 ![]() | wpis nr 186 460 [ CZCIONKA MONOSPACE ] dziękuje ![]() |
2009-03-09 (21:39)![]() Data rejestracji: 2008-10-13 00:00:00 Ilość postów: 20527 ![]() | wpis nr 186 473 [ CZCIONKA MONOSPACE ] Hej! Jak dla mnie to za dużo w tym excelu obiektów jestem zielony z tego jak ta strona, ale znalazłem coś takiego: Sub tu_dopisz() Dim komurka As Range For Each komurka In Range(\"A3:A6000\") If komurka.Value = \"\" Then Exit For Next ostatnia = komurka.Row MsgBox ostatnia End Sub |
2009-03-09 (21:43)![]() Data rejestracji: 2005-02-24 00:00:00 Ilość postów: 6116 ![]() | wpis nr 186 475 [ CZCIONKA MONOSPACE ] Jak to dużo obiektów było arkuszy ukrytych nie odkrywać ![]() Dzięki jutro sprawdzę co to Makro robi ![]() wesołego wieczoru ![]() |
2009-03-10 (14:53)![]() Data rejestracji: 2005-02-24 00:00:00 Ilość postów: 6116 ![]() | wpis nr 186 551 [ CZCIONKA MONOSPACE ] sindbad ... dziękuje ale to tylko pokazywało jaki nr ma ostatnia pusta komórka ![]() ![]() \'pętla sprawdzająca czy już jest wykonany wpis ostatniego losowania If Arkusz3.Range(\"AP103\").Value <> Arkusz3.Range(\"AP108\").Value Then \' kopiowanie do ostatniej wolnej komórki Arkusza Baza Losowań Sheets(\"Baza losowan Hybryda\").Select Range(\"AP54:BK103\").Select Selection.Copy With Worksheets(\"Baza Losowań\") ActiveWorkbook.Worksheets(\"Baza Losowań\").Range(\"a65500\") _ .End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlValues Sheets(\"Baza Losowań\").Select End With End If działa to prawidłowo wykonuje wpis podanego zakresu od ostatniej pustej komórki tylko potrzebuje jeszcze tą ostatnią pustą komórkę przesunąć do góry o wartość jaka jest podana w AP110 jest tam podana wartość ujemna ![]() wesołego dnia ![]() |
2009-03-10 (19:43)![]() Data rejestracji: 2005-02-24 00:00:00 Ilość postów: 6116 ![]() | wpis nr 186 618 [ CZCIONKA MONOSPACE ] UFFFFFF ukończyłem ![]() ![]() wystarczyło dopisać Makro kasujące podwójne wpisy i już po problemie a niech wgrywa się podwójnie 49 losowań i tak będzie na koniec usunięte ![]() = ![]() ostatnia część Makra jaka została dodana do Arkusza Baza_Losowań_ML_Hybryda i koniec z wpisywaniem wyników losowań do arkusza same się wpiszą ![]() Jak wykończę kosmetykę Arkusza wgram Go jutro do pobrania wesołego wieczoru ![]() |
2009-03-11 (20:23)![]() Data rejestracji: 2005-02-24 00:00:00 Ilość postów: 6116 ![]() | wpis nr 186 848 [ CZCIONKA MONOSPACE ] Baza losowan Hybryda ML .... jakoś tam działa ![]() można jej działanie sprawdzić pobierając ze strony http://sufler.com.pl/slawek/ wesołego wieczoru ![]() |
2009-03-12 (12:51)![]() Data rejestracji: 2006-07-21 00:00:00 Ilość postów: 2814 ![]() | wpis nr 186 972 [ CZCIONKA MONOSPACE ] Sławku, odwaliłeś kawał dobrej roboty, tym niemniej miałem dziś chwilkę i pozwoliłem sobie pomajstrować przy Twoim makrze. Efekt poniżej. Omówię różnice w stosunku do Twojego: - ilość brakujących losowań nie ma znaczenie, makro pobierze również wszystkie jeśli zachodzi taka potrzeba - oszczędność arkuszy w stosunku do Twojej Hybrydy, wszystko dzieje się w jednym arkuszu - nie korzystam z działań na arkuszu aby dokonać konwersji daty czy wyników losowań, do arkusza (zawierającego Bazę Losowań) wczytuję tylko kolejne strony z wynikami, reszta dzieje się \"w locie\" - nazwa arkusza z bazą jest nieistotna, jest ona pobierana z aktywnego arkusza, ponieważ jest to jednak makro auto, w przypadku istnienia większej ilości arkuszy przy zamknięciu (i zapisie) skoroszytu z aktywnym innym arkuszem niż Baza Losowań uaktywniam Arkusz1. Można uzupełnić kod o funkcję sprawdzającą w którym arkuszu są zawarte wyniki losowań (chociaż tak do końca nigdy to pewne nie będzie) i uaktywnienie tego arkusza, ale to kosmetyka i szkoda na to czasu, tak więc Baza musi znajdować się w Arkusz1 (jako nazwa obiektu a nie arkusza). Gdyby nie było to makro auto, to nalezy tylko zadbać o to aby przycisk je uruchamiający znajdował się w arkuszu z Bazą, a instrukcję Arkusz1.Activate należy usunąć Wszystkich testów tego makra oczywiście nie przeprowadziłem Pozdrawiam PS. Makro w następnym poście, bo tu już się nie mieści |
2009-03-12 (13:26)![]() Data rejestracji: 2006-07-21 00:00:00 Ilość postów: 2814 ![]() | wpis nr 186 982 [ CZCIONKA MONOSPACE ] daję obrazek, bo admin przycina teksty do 1999 znaków, kryzys jak widać wszędzie, oszczędności ![]() ![]() |
2009-03-12 (15:30)![]() Data rejestracji: 2005-02-24 00:00:00 Ilość postów: 6116 ![]() | wpis nr 187 018 [ CZCIONKA MONOSPACE ] super ![]() ![]() ![]() Już nawet Makro umiem czytać pojętny uczeń jestem ![]() I tak doszedłem dziś do wniosku za Baza Losowań Hybryda jak kaszanka mi wyszła .... ale na tym Makro to już się poprawie ![]() wielkie dzięki ![]() wesołego dnia ![]() |
2009-03-12 (21:48)![]() Data rejestracji: 2005-02-24 00:00:00 Ilość postów: 6116 ![]() | wpis nr 187 130 [ CZCIONKA MONOSPACE ] coś żle przepisałem to polecenie blokuje mi makro = ![]() wesołego wieczoru ![]() |
2009-03-12 (22:56)![]() Data rejestracji: 2006-07-21 00:00:00 Ilość postów: 2814 ![]() | wpis nr 187 158 [ CZCIONKA MONOSPACE ] hmm, nie ma komunikatu to nie bardzo wiadomo o co chodzi, na początek usunął bym znak podziału tej instrukcji na dwa wiersze (podkreślenie), tzn. usunąc podkreślenie i połączyć te dwa wiersze w jeden.... Poza tym - po co przepisujesz, mogę to przecież w kawałkach w postaci tekstu zamieścić Dobranoc |
2009-03-13 (07:51)![]() Data rejestracji: 2006-07-21 00:00:00 Ilość postów: 2814 ![]() | wpis nr 187 171 [ CZCIONKA MONOSPACE ] tu jest w pliku tekstowym, jeśli ktoś by potrzebował: http://www.sendspace.pl/file/Jq21BwBb/ Pozdrawiam |
2009-03-13 (15:00)![]() Data rejestracji: 2005-02-24 00:00:00 Ilość postów: 6116 ![]() | wpis nr 187 237 [ CZCIONKA MONOSPACE ] Działa i to jak Wielkie Dzięki ![]() ![]() Możesz jeszcze zdradzić tajemnice gdzie pomajstrować w tabelach pobierania Makro żeby Dużego i Express można było pobrać jak na razie można tylko zmienić adres pobierania strony losowań ale coś tablica od Multi blokuje transformacje wyników i się nie pokazują nr losowań i daty da się tylko pobrać do Numerka ten układ Makra nie pasuje to wiem ale 3 bazy samo pobierające się to już i tak było by dużo ![]() Jak sądzę na takie coś nie tylko ja czekałem jeszcze raz Wielkie Dzięki ![]() |
2009-03-13 (21:11)![]() Data rejestracji: 2005-02-24 00:00:00 Ilość postów: 6116 ![]() | wpis nr 187 322 [ CZCIONKA MONOSPACE ] wgrałem na stronę surowe Makro i Arkusz z jak mi się wydaje ładną grafika ![]() Makro z Arkusza grafikę jak i zastosowane formatowania na wpisane w Makro wiec wystarczy tylko Makro z niego wpisać na swój Arkusz i uruchomić = ![]() http://sufler.com.pl/slawek/ wesołego wieczoru ![]() |
2009-03-13 (21:15)![]() Data rejestracji: 2006-07-21 00:00:00 Ilość postów: 2814 ![]() | wpis nr 187 325 [ CZCIONKA MONOSPACE ] Nie testowałem, ale zapewne (oprócz adresów - tego wstępnego i do danych historycznych) trzeba 22 w: ReDim tab_ml(brakujacych, 22) zamienić na 8 dla DL i 7 dla Ex, no i w pętli For k = 0 To 19 tab_ml(i, 3 + k) = Val(pom_wynik(k)) Next k zamienić 19 na 5 dla DL i 4 dla ML Najlepiej te wszystkie rzeczy jako zmienne określić, i wtedy przy wyborze danej gry z automatu ustawić wszystko, pamiętać też należy o ustawieniu parametrów \"zrzutu\" ściągniętej bazy. Na DL i EX nie patrzyłem, ciekawił mnie Numerek (ze względów \"technicznych\", a nie fascynacji tą grą), ale kwerendą excela nie da rady. Excel trawi tylko tekst w takiej kwerendzie, a u Paski numerek jest w postaci rysunku, wprawdzie nazwy rysunków odpowiadają wylosowanej liczbie, ale jest to widoczne w kodzie strony, a nie w pobranej tabeli. Pozdrawiam |
2009-03-13 (21:24)![]() Data rejestracji: 2005-02-24 00:00:00 Ilość postów: 6116 ![]() | wpis nr 187 329 [ CZCIONKA MONOSPACE ] Ja na pierwszej wersji Arkusza Testowałem dlatego wyszła Baza Losowań Hybryda 0 ją właśnie na Makro chcę przerobić i przerobie uparty jestem .... z Numerkiem też dużego problemu nie ma z tabeli 6 pobierane są 4 liczby losowań i gdzieś z innej tabeli numerek Numerek wesołego wieczoru ![]() |
| Dodaj wpis w tym temacie | Spis tematów | Wyniki lotto | Strona: 1 2 ... 6 7 8 ... 53 54 Wyślij wiadomość do admina |