Dodaj wpis w tym temacie
Spis tematów | Strona: 1 2 ... 44 45 46 ... 51 52 Wyślij wiadomość do admina |
Przewiń wpisy ↓ | Excel- potrzebna pomoc |
2021-03-21 (16:33) pawel Data rejestracji: 2004-01-11 Ilość postów: 6003 | wpis nr 1 353 747 [ CZCIONKA MONOSPACE ] ok. nic nie kombinujcie dzięki bardzo .......... będzie SUPER dam radę ........na piechotę też dotrę do mety .................. cofam prośbę .................przepraszam....... |
2021-03-21 (16:38) Lottonauta Data rejestracji: 2012-09-03 Ilość postów: 2694 | wpis nr 1 353 749 [ CZCIONKA MONOSPACE ] Naprawdę chcemy ci pomóc, może nawet gdy zadanie będzie b. łatwe to dostaniesz rozwiązanie za darmo, ale musimy zrozumieć o co ci chodzi Pozdrawiam --- wpis edytowano 2021-03-21 16:38 --- |
2021-03-21 (16:55) pawel Data rejestracji: 2004-01-11 Ilość postów: 6003 | wpis nr 1 353 750 [ CZCIONKA MONOSPACE ] ja przepraszam i też pozdrawiam nic nie BYŁO ......jestem zadowolony że udało mi się trafić na dobry trop do wygranej ......a to co podałem to jest za dużo materiału żeby to ogarnąć !!!!!! SORRY , ale tak jest................... |
2021-03-21 (17:52) sindbad Data rejestracji: 2008-10-13 Ilość postów: 20518 | wpis nr 1 353 764 [ CZCIONKA MONOSPACE ] To było dobre he!!! |
2021-03-21 (18:27) siger7 Data rejestracji: 2017-07-30 Ilość postów: 199 | wpis nr 1 353 768 [ CZCIONKA MONOSPACE ] @Fair_play Zmodyfikowalem podana przez Ciebie formule do znajdowania i usuwania parek z rozpisu: =JEŻELI(LUB(LICZ.JEŻELI(A1:F1;H$1)+LICZ.JEŻELI(A1:F1;I$1)=2;LICZ.JEŻELI(A1:F1;H$2)+LICZ.JEŻELI(A1:F1;I$2)=2;LICZ.JEŻELI(A1:F1;H$3)+LICZ.JEŻELI(A1:F1;I$3)=2);1;0) na =JEŻELI(LUB(LICZ.JEŻELI(A1:F1;K$1)+LICZ.JEŻELI(A1:F1;L$1)+LICZ.JEŻELI(A1:F1;M$1)+LICZ.JEŻELI(A1:F1;N$1)=4);1;0) do znajdowania i usuwania linii rozpisow zawierajacych czworki. Problem jest w tym, ze formula dziala do 84 wiersza w kolumnie "K L M N" /moze ja cos zle robie/ i koniec. Jest jakies inne rozwiazanie - formula- ? Pozdrawiam |
2021-03-21 (21:37) puszatek Data rejestracji: 2020-01-15 Ilość postów: 368 | wpis nr 1 353 807 [ CZCIONKA MONOSPACE ] @ pawel Czy chodziło Ci o program do wyszukiwania trafnych w zakładach, podawania ilości trafnych, wysokości wygranych? Jeśli tak to mam coś podobnego, ale wyniki wyświetlane są w taki sposób. Poniżej przykład. |
2021-03-21 (21:58) fair_play Data rejestracji: 2016-05-12 Ilość postów: 7813 | wpis nr 1 353 822 [ CZCIONKA MONOSPACE ] siger7> Moja formuła obsługiwała tylko 2 linie par do usunięcia. Twoja obsługuje tylko pierwszą "czwórkę". A co z resztą ? Nie rozumiem co znaczy "działa do 84 wiersza" ? Ile masz tych "czwórek" do sprawdzania. Już przy tylko takiej ich ilości jak na zdjęciu (13) nie obsłużysz tego formułą, bo będzie ona miała kilometr długości A nie dostałeś ode mnie makra do tego sprawdzania ? --- wpis edytowano 2021-03-21 21:59 --- |
2021-03-21 (22:26) siger7 Data rejestracji: 2017-07-30 Ilość postów: 199 | wpis nr 1 353 836 [ CZCIONKA MONOSPACE ] @fair_play Zamiescilem w poscie tylko fragment formuly tak jak zauwazyles dla jednej "czworki". Po modyfikacji "gigantyczna" formula obsluguje 84 czworki. Mysle, ze skonczyla sie dozwolona ilosc znakow dla formuly i dalej nie pojdzie. Mam do przerobienia 100 czworek na bardzo dlugim rozpisie. Makro otrzymalem od Ciebie, ale do par / kolumny x y /. Jak jest takze do czworek to poprosze. |
2021-03-21 (23:03) siger7 Data rejestracji: 2017-07-30 Ilość postów: 199 | wpis nr 1 353 844 [ CZCIONKA MONOSPACE ] @fair_play Wyglada na to, ze makro funkcjonuje dla czworek Dzieki |
2021-03-21 (23:10) fair_play Data rejestracji: 2016-05-12 Ilość postów: 7813 | wpis nr 1 353 846 [ CZCIONKA MONOSPACE ] siger7> Wydaje mi się, że nie ma prawa funkcjonować prawidłowo. To makro sprawdza bowiem tylko dwie pierwsze liczby z "czwórek". Poniższe makro powinno spełniać oczekiwania dla kazdej ilości "sprawdzaczy". jest tylko warunek, że czwórki (jak i każda inna ilość "sprawdzaczy") powinny się zaczynać od kolumny "X", nie wcześniej. Option Base 1 Sub wyczyść() Columns("V:V").Select Selection.ClearContents wierszy = Application.WorksheetFunction.CountA(Range("A1:A65536")) pozycji = Application.WorksheetFunction.CountA(Range("A1:T1")) test = Application.WorksheetFunction.CountA(Range("X1:X65536")) ile = Application.WorksheetFunction.CountA(Range("X1:AQ1")) For y1 = 1 To wierszy Cells(y1, 22) = 0 For y2 = 1 To test licznik = 0 For x = 1 To pozycji For xx = 1 To ile If Cells(y1, x) = Cells(y2, 23 + xx) Then licznik = licznik + 1 End If Next Next If licznik = ile Then Cells(y1, 22) = 1 End If Next Next decyzja = MsgBox("Usunąć linie ?", vbYesNo) If decyzja = 6 Then Columns("A:V").Select ActiveSheet.Sort.SortFields.Clear ActiveSheet.Sort.SortFields.Add Key:=Range(Cells(1, 22), Cells(wierszy, 22)) _ , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal With ActiveSheet.Sort .SetRange Range(Cells(1, 1), Cells(wierszy, 22)) .Header = xlGuess .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With Columns("V:V").Select Selection.Find(What:="1", After:=ActiveCell, LookIn:=xlFormulas, LookAt _ :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _ False, SearchFormat:=False).Activate wiersz = ActiveCell.Row Range(Cells(wiersz, 1), Cells(wierszy, 22)).Select Selection.Delete Shift:=xlUp End If Columns("V:V").Select Selection.ClearContents End Sub --- wpis edytowano 2021-03-21 23:15 --- |
2021-03-23 (07:03) makinero Data rejestracji: 2017-04-10 Ilość postów: 8697 | wpis nr 1 354 024 [ CZCIONKA MONOSPACE ] Jak usunąć pliki według listy ścieżek prowadzących do tych plików? Sciezki do plikow zapisane w pliku tekstowym. Np. X:\Foler\file.html X:\Folder\file2.html Macie pomysł? |
2021-03-23 (11:12) nowy35 Data rejestracji: 2005-04-23 Ilość postów: 2907 | wpis nr 1 354 051 [ CZCIONKA MONOSPACE ] po 1) .html to nie plik tekstowy .txt po 2 nie podałeś w czym - czy kompie , czy androidzie, czy na papierze toaletowym wyszukiwarka wpisz .html lub "bardziej zaawansowane" wybrac: html potem sortowanie pod różnymi wzg. to proscizna jak 'swinski ogon' zacznij myslec |
2021-03-23 (11:35) grem10 Data rejestracji: 2018-06-03 Ilość postów: 13 | wpis nr 1 354 056 [ CZCIONKA MONOSPACE ] Usuwać można z poziomu wiersza poleceń: polecenie del (Windows, pod Linux rm) pojedynczy plik del X:\Foler\file.html lub del X:\Folder\file2.html wiele plików naraz z jakimś rozszerzeniem del *.*, przykład del X:\Folder\*.txt usuwa pliki wszystkie pliki w tym folderze .txt, zamiast txt można podstawiać inne rozszerzenia .html, .doc itd., (całe katalogi usuwa polecenie rd). Programy do SQLITE3 do CSV i nie tylko, jest tego sporo, można spróbować: SQLiteStudio (sqlitestudio.pl), lub databasenet4 (fishcodelib.com/Database.htm) albo bardziej rozbudowany menadżer baz: wersja comunnity (darmowa) do pobrania z github.com/dbeaver/dbeaver/releases. |
2021-03-23 (11:52) fair_play Data rejestracji: 2016-05-12 Ilość postów: 7813 | wpis nr 1 354 060 [ CZCIONKA MONOSPACE ] makinero> Ponieważ zadajesz pytanie w wątku "Excel- potrzebna pomoc" więc odpowiadam po excelowsku Wklej ten plik tekstowy z nazwami plików w kolumnę "A", a następnie uruchom makro: Sub usuń_pliki() Dim nazwa_pliku As String Dim plik_istnieje As String Dim komunikat As String plików = Application.WorksheetFunction.CountA(Range("A1:A65000")) For y = 1 To plików nazwa_pliku = Cells(y, 1) plik_istnieje = Dir(nazwa_pliku) If plik_istnieje = "" Then komunikat = "Wybrany plik " & nazwa_pliku & " nie istnieje!" MsgBox komunikat Else Kill nazwa_pliku komunikat = "Wybrany plik " & nazwa_pliku & " usunięty!" MsgBox komunikat End If Next End Sub Jeśli nie interesują Cię komunikaty to zablokuj te dwie linie MsgBox komunikat stawiając przed nimi apostrof: 'MsgBox komunikat --- wpis edytowano 2021-03-23 12:00 --- |
2021-03-24 (07:16) makinero Data rejestracji: 2017-04-10 Ilość postów: 8697 | wpis nr 1 354 245 [ CZCIONKA MONOSPACE ] grem10 - coś jest nie tak z poleceniem C:\Windows\system32>del W:\PR.RU ALL\2010_08_23_911.html Nie można odnaleźć określonego pliku. |
2021-03-24 (11:22) grem10 Data rejestracji: 2018-06-03 Ilość postów: 13 | wpis nr 1 354 291 [ CZCIONKA MONOSPACE ] grem10 - coś jest nie tak z poleceniem Może zapomniałem o tym że trzeba być na tym dysku co plik, bo tak to nie zadziała, więc żeby przejść na inny dysk wystarczy wpisać literę dysku ze znakiem : ( dwukropek) i nacisnąć enter czyli w: enter (w konsoli będzie widać W:\>), gdzie jesteś wyświetla polecenie dir. Z poziomu eksploratora można też łatwo kasować wybrane pliki, może nawet bezpieczniej bo przenosi je do kosza, wystarczy otworzyć katalog/folder (adres można wkleić na pasku), wystarczy trzymać klawisz control (ctrl) i klikać lewym myszki (zaznacza) wybrane pliki, nacisnąć klawisz del, wyskoczy okienko czy chcesz przenieść do kosza i tyle, kosz można opróżnić lub przywrócić wybrane pliki. |
2021-03-24 (15:34) makinero Data rejestracji: 2017-04-10 Ilość postów: 8697 | wpis nr 1 354 327 [ CZCIONKA MONOSPACE ] grem10 - napisz mi co należy dodać do listy, aby stworzyć plik wykonywalny (.bat) Ponieważ jest niemożliwe wklejenie bardzo dużej ilości tekstu (za dużo mocy procesora/ram) --- wpis edytowano 2021-03-24 15:36 --- |
2021-03-24 (15:44) kleszek Data rejestracji: 2006-05-27 Ilość postów: 4881 | wpis nr 1 354 328 [ CZCIONKA MONOSPACE ] makinero, już wcześniej fair_play zwracał Ci uwagę, że jest to temat związany z excelem. Twoje pytania nie mają z tym nic wspólnego. Nie zmuszaj mnie do tego abym nałożył Ci bana w tym temacie. Masz problemy z bazami danych ? Załóż sobie nowy temat, gdzie będziesz mógł zadawać takie pytania jakie Ci tylko przyjdą do głowy. |
2021-03-24 (17:57) nowy35 Data rejestracji: 2005-04-23 Ilość postów: 2907 | wpis nr 1 354 341 [ CZCIONKA MONOSPACE ] ""(15:34)"" ja pierrrnnnicccze co za udręka ((już wcześniej TO zauważyłem))) dla tego napisałem """zacznij myslec""" END --- wpis edytowano 2021-03-24 18:08 --- |
2021-03-24 (18:59) nowy35 Data rejestracji: 2005-04-23 Ilość postów: 2907 | wpis nr 1 354 347 [ CZCIONKA MONOSPACE ] sorry za ten wpis Makinero bierzesz się za liczby lotto, a NIE potrafisz skasować pliki to bardzo dziwne!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! the end Kleszek, Przyjemnych Świąteczek!!!!!!! |
| Dodaj wpis w tym temacie | Spis tematów | Wyniki lotto | Strona: 1 2 ... 44 45 46 ... 51 52 Wyślij wiadomość do admina |