Forum strony www.multipasko.pl [Regulamin]


Dodaj wpis w tym temacie
Spis tematów
Login:

Hasło:
Strona: 1 2 ... 44 45 46 ... 51 52
Wyślij wiadomość do admina

Przewiń wpisy ↓

Excel- potrzebna pomoc

2021-03-21 (16:33)

status pawel
Data rejestracji: 2004-01-11
Ilość postów: 6003

127
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)

status Lottonauta
Data rejestracji: 2012-09-03
Ilość postów: 2694

13559
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)

status pawel
Data rejestracji: 2004-01-11
Ilość postów: 6003

127
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)

status sindbad
Data rejestracji: 2008-10-13
Ilość postów: 20518

3794
wpis nr 1 353 764
[ CZCIONKA MONOSPACE ]

To było dobre he!!!
2021-03-21 (18:27)

status siger7
Data rejestracji: 2017-07-30
Ilość postów: 199

15381
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)

status puszatek
Data rejestracji: 2020-01-15
Ilość postów: 368

16097
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)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 7813

14865
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)

status siger7
Data rejestracji: 2017-07-30
Ilość postów: 199

15381
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)

status siger7
Data rejestracji: 2017-07-30
Ilość postów: 199

15381
wpis nr 1 353 844
[ CZCIONKA MONOSPACE ]

@fair_play

Wyglada na to, ze makro funkcjonuje dla czworek Dzieki
2021-03-21 (23:10)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 7813

14865
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)

status makinero
Data rejestracji: 2017-04-10
Ilość postów: 8697

15235
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)

status nowy35
Data rejestracji: 2005-04-23
Ilość postów: 2907

898
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 zdjęcie
2021-03-23 (11:35)

status grem10
Data rejestracji: 2018-06-03
Ilość postów: 13

15716
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)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 7813

14865
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)

status makinero
Data rejestracji: 2017-04-10
Ilość postów: 8697

15235
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)

status grem10
Data rejestracji: 2018-06-03
Ilość postów: 13

15716
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)

status makinero
Data rejestracji: 2017-04-10
Ilość postów: 8697

15235
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)

status kleszek
Data rejestracji: 2006-05-27
Ilość postów: 4881

2047
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)

status nowy35
Data rejestracji: 2005-04-23
Ilość postów: 2907

898
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)

status nowy35
Data rejestracji: 2005-04-23
Ilość postów: 2907

898
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 lottoStrona: 1 2 ... 44 45 46 ... 51 52
Wyślij wiadomość do admina