Uparłeś się przy tej hulajnodze. Jeśli koniecznie chcesz w taki sposób, to spróbuj takiego kodu: [syntax=vbscript]Sub Podstaw_kolejne_liczby() Dim lw As Long, n As Long, a As Variant Dim rng As Range, found As Range lw = Range("A" & Rows.Count).End(xlUp).Row 'numer ostatniego wypełnionego wiersza Set rng = Range("A1:A" & lw) Set found = Range("A"...
Masz rację. Moja pomyłka, przepraszam (było rano). Powinno być: nr_bajtu_pamięci_ekranu = (x div 8 )+(y - 1) * 5 Przy edycji musiałem skasować te kilka znaków. Teraz chyba to działa. y to oczywiście numer wiersz dla piksela. Masz rację, że w asemblerze natywnie nie ma tablic dwuwymiarowych, ale bardzo łatwo jest oprogramować taką strukturę pamiętając...
[syntax=vb]ComboBox1.ListIndex[/syntax] Tylko że ListIndex zaczyna liczyć od 0 więc jeżeli chcesz poznać wiersz to : [syntax=vb]wiersz=ComboBox1.ListIndex+1[... Ale jeżeli listę pobierasz nie od pierwszego wiersza arkusza należy dodać liczbę wierszy od pierwszego do wiersza w którym zaczyna się początek listy czyli np: [syntax=vb]wiersz=ComboBox1.ListIndex+1....
Uruchom wiersz poleceń w instalatorze. Uruchom narzędzie Diskpart. Następnie wpisz list disk. Wybierz dysk na którym chcesz zainstalować Windowsa za pomocą polecenia select disk x. X to numer dysku. Wybrany dysk wyczyść za pomocą polecenia clean. Następnie sformatuj go przy pomocy komendy format. Po tym zabiegu zrestartuj komputer i zobacz czy pojawi...
Dawno nie zaglądałem na forum i nie spojrzałem że autor założył już temat. A ponieważ zasugerowałem się dawnym (z 2012 roku :) ) kodem kolegi adamas_nt czuję się w obowiązku dołączyć do wątku. :) Przerzucę informację z PW jak przedstawił mi to autor: -- ... Może w skrócie opisze o co mi mniej więcej chodzi: Chciałbym żeby załączony arkusz zaczął żyć...
Aby usunąć wiele kolumn w VBA na podstawie nazw nagłówków, możesz użyć poniższego kodu. Ten kod przeszukuje wiersz nagłówka (w tym przypadku wiersz 1) i usuwa kolumny, które pasują do określonych nazw nagłówków. Sub UsunKolumny() Dim Naglowki As Variant Dim Naglowek As Variant Dim Kolumna As Range ' Określ nazwy nagłówków do usunięcia Naglowki = Array("Naglowek1",...
(at)ElektrodaBot co to jest za element? https://obrazki.elektroda.pl/2001408500_... Krótka odpowiedź Układ w obudowie SOT-23-6 z nadrukiem „Ui1 31A” to jeden z popularnych „zielonych” (green-mode) kontrolerów flyback PWM stosowanych w zasilaczach małej mocy. W praktyce spotyka się go najczęściej jako: • AP3125(A) – Diodes Inc. lub w wersjach...
[syntax=vbscript]Sub ImportujMaszyny() Set r = Sheets("Arkusz1") Set i = Sheets(2) owr = r.Cells(Rows.Count, "A").End(xlUp).Row owi = r.Cells(Rows.Count, "A").End(xlUp).Row For w = 4 To owr Step 14 nr = r.Cells(w, 2) s = Application.Match(nr, i.Range("C1:C" & owi), 0) If s > 0 Then d = i.Cells(s + 1, 3) d = DateSerial(Year(d), Month(d), 1) wr = Application.Match(nr,...
DataGridView posiada właściwość SelectedRows. Każdy wiersz (DataGridViewRow) w tej kolekcji ma właściwość Index.
Witam [syntax=vb] Sub podzial_pliku() Dim kol As String Dim wiersz As Integer Dim nazwa As String Dim ark As Worksheet kol = InputBox("Podaj litere kolumny na podstawie ktorej nastapi podzial plikow", "Pytanie") wiersz = InputBox("Podaj numer wiersza od ktorego zacznie sie podzial plikow", "Pytanie") Range(kol & wiersz).Select Set ark = ActiveSheet...
Puste pole pojawia się, gdyż poepłniłem błąd. Przy linii ReDim strNowaLista odejmij 1 od intPozycja [syntax=vb]ReDim strNowaLista(intPozycja -1, 2)[/syntax] Co do usuwania/modyfikowania danych pracowników. Masz coś, co załaduje Ci ich dane do UserForma, tak? Coś co znajduje odpowiedni wiersz i ładuje? Jeśli tak, i znasz numer wiersza, to chyba nie powinien...
Przetestuj ten kod dla zdarzenia Worksheet_Change arkusza Form2. W komórce B4 arkusza Form2 wpisujesz jedynie numer rekordu do skopiowania. [syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) Dim lLstRw& 'pierwszy wolny wiersz w arkuszu "baaza" Dim lLstRwBs& 'ostatni zapisany wiersz w arkuszu "zbaza1" Dim lFndRec& 'numer wiersza ze znalezionym...
-wartosc w kolumnie "O" sie zmieni na "X" i od ktorej jest uzalezniony kolor - wiersz w ktorym to wystapi jest w zakresie od "A - U" Analogicznie, zmień [syntax=vb]ost_col = Range("IV1").End(xlToLeft).Column[/synta... na sztywno ustalony numer kolumny:[syntax=vb]ost_col = 21[/syntax]
Wystarczy pobrać który wiersz w kolejności z listbox'a zaznaczyłeś lstFiltr.ListIndex a jak widać wprowadzasz do boxa listę od drugiego wiersza (B2) więc mając na uwadze to że listbox "liczy" własne wiersze od 0 należy powiększyćwynik o 2 i już masz nr wiersza. nrWrs = lstFiltr.ListIndex +2
Jeśli w zadaniu nie ma zastrzeżeń, np. jakoby numer stanu miał coś wspólnego z reprezentacją binarną "czegośtam", to w czym problem? Wyjdzie pięknie: U=Q1 Tylko, czy nie trzeba by byłoby dopełnić tabelki o wiersz 10?
Nie ma problemu - zmienimy pętlę warunkową na zwykłą. Na marginesie, jak widać w twoim załączniku, numery pisma przy "anulowaniu" dokumentu też są usuwane. Najpierw sprawdzimy ile jest wierszy, a potem pętlą będziemy sprawdzać czy wiersz nie był już skopiowany i czy ma numer zadania. Jeżeli tak to go przerzuci, jak nie "pójdzie" dalej. (taki wiersz...
Dla mnie bomba. :) Możesz jeszcze drobne kosmetyczne poprawki zrobić. Żeby się nie wyświetlało #N/D! - formatowanie warunkowe. Dla 'NUMERY KONT BANKOWYCH'!$A$5:$J$104 zadeklarować tablicę, dla takiego właśnie obszaru, wtedy dopisując kolejny wiersz automatycznie obszar będzie się powiększał, ale w regułach będziesz musiał zmienić z 'NUMERY KONT BANKOWYCH'!$A$5:$J$104...
Czemu jak już zrobiłeś przykład nie załączyłeś go do postu? (spakuj na przyszłość zipem i załącz) Po prostu wykorzystaj funkcję wyszukaj.pionowo() Zamknąłem w pętli i sprawdza po kolumnie M czy wysłano (dlatego tez na końcu pyta czy wysłałeś. Poniżej z paroma "wodotryskami". Makro nie sprawdza poprawności adresu mailowego więc jeżeli będzie zły a ty...
Czyli z tego z co zrozumiałem (pierwszy obrazek): Dysk 0 <- NVMe SSD, styl part. MBR Dysk 1 <- SATA SSD, styl part. GPT Oczyść docelowy NVMe SSD i spartycjonuj pod DISKPART DISKPART> list disk DISKPART> sel disk 0 (sprawdź numer dysku!) DISKPART> clean DISKPART> convert gpt DISKPART> create part efi size=100 DISKPART> format...
Spróbuj - Wiersz polecenia jako administrator: diskpart DISKPART> sel disk 0 DISKPART> list part DISKPART> sel part * DISKPART> set id=12 DISKPART> exit * - numer partycji Recovery (np. 4)
Nie mam za dużo czasu a akurat do tego przydało by sie makro. Wesz co a może zrób sumy częściowe. TZN Zaznacz całą tabelę i W menu dane wybierz sortuj , wciśnij ma wiersz nagłowka i w sortuj wg kolumny: nr ewidencyjny. daj Ok Następnie w menu dane wybierz sumy częściowe. Dla każdej zmiany w: zaznacz numer ewidencyjny Użyj funkcji wybierz suma Dodaj...
(at)lopr_pol tak to wygląda ciągiem Aby wgrać jakikolwiek program, musisz go najpierw skompilować (!) Te dwie od lewej conki na górnym pasku w IDE oznaczają (mają funkcje): check mark (ptaszek, albo 'verify') - jest to próba kompilacji kolejna, ze strzałką w prawo, albo 'Upload') - to zespolona akcja kompilacji i wpisanie tej kompilacji do processora....
Witam Proponuję: 1. Lektura tego artykułu KB: Komunikat o błędzie „Błąd łączy: 10061, Numer błędu: 0x800ccc0e” jest wyświetlany przy próbie wysłania lub odebrania poczty e-mail w programie Outlook lub Outlook Express http://support.microsoft.com/kb/191687/p... 2. Na kłopotliwej stacji uruchom wiersz poleceń i wpisz komendę: telnet numer_ip_serwera_pocztowego...
No cóż, opis nie jest bardzo czytelny, ale jeśli taki miał być efekt: https://obrazki.elektroda.pl/4588789900_... to kod, który to zrealizuje może wyglądać następująco: [syntax=vbscript] Sub FZ() r = 1 'kolejny sprawdzany wiersz (row) rstart = 0 'numer pierwszego w serii wiersza do którego wklejam wartości, jednocześnie numer wiersza...
Moja porada odnośnie nośnika instalacyjnego: 1. uruchom windows 2. podłącz pendrive 3. uruchom wiersz poleceń (cmd.exe) jako administrator 4. i teraz, bez błędu, wpisuj kolejno: diskpart (enter) list disk (enter) Pojawi się lista dysków tak jak na foto, tutaj uważaj aby nie wybrać dysku systemowego, szukaj swojego pendrive (zwracając uwagę na wielkość...
Takie czyszczenie w pętli nie jest zbyt efektywne: lepiej od razu wyczyścić cały zakres, jak już, to możesz przecież napisać: Sporządził: , sprawdził, czy jest on większy niż 17, a jeżeli tak, usunął: Set arkO , jeżeli tego nie używasz - w zupełności wystarczy wrzucić nazwę tego arkusza bezpośrednio do With.
W całości popieram zdanie kolegi jankolo (i żeby nie było, że ceruję się u moderatora) :D Toteż nie podeślę gotowca. Odpowiem tylko na zadane pytania. Czy muszę dla każdego z tych produktów tworzyć osobny warunek If Nie. czy mogę zastąpić to jakąś petlą Nie trzeba. w jaki sposób? Tworzysz formularz. Umieszczasz na nim Combobox -a i Label -a. Właściwość...
Na moje oko wystarczy raz przejechać plik i zbudować indeks - jeden int na każdy wiersz - z offsetem danej linii w pliku. Potem mając numer linii wystarczy zajrzeć raz do tej tablicy, otworzyć plik, zrobić fseeka na daną pozycję i wczytać od razu właściwą linię. Pamięć na indeks to liczba linii * 4 B czyli jakieś 12 MB. Aha, widzę, że wczytujesz całe...
No to dalej sprawdzamy Rozumiem że połączyłeś wszytko (w odpowiednie gniazda 6 (czasem nie 4 ) U mnie na W7 jak mam ten protokół w wersji 6 włączony nie łączy mi się komp z routerem. Ale najpierw sprawdz status sieci WAN w reouterze.
Zacznij od początku jeszcze raz bo coś za dużo usunąłeś z kodu (nie mam jak ci podesłać bo w pracy mam 2010 i rozwala mi plik) między tymi linjami kodu wprowadź warunek If IsNumeric(fragment2) Then fragment2 = "" kod = fragment1 & fragment2 Czyli ma wyglądać tak: If IsNumeric(fragment2) Then fragment2 = "" If...
Trzeba sprawdzić czy ta part. odzyskiwania nie jest używana - wiersz polecenia uruchom jako administrator i wklep: REAgentC /info powinna być tam ścieżka w stylu: \\?\GLOBALROOT\device\ harddisk0\partition3 \Recovery\WindowsRE zwróć uwagę na numer dysku - jako 0 to OK a jak 1 to tymczasowo wyłącz WinRE: REAgentC /disable Po tym i skopiowaniu z niego...
Witam Mam problem z odczytem z pliku plik wejściowy wygląda następująco 1 2 3 4 5 6 7 8 8 9 10 11 12 13 14 plik wyjściowy 4064048 4064048 0 0 0 0 0 0 0 Niestety powinien wyglądać podobnie ja wejściowy :| Tak wygląda kod programu - kompilator to GCC W zastosowaniu do plików tekstowych to nie jest błąd, jednak ogólnie, w takich konstrukcjach zmienna...
Sprawdź takie makro: Cells(CC, 3).Cut zastąp linijką Cells(CC, 3).Copy . Makro działa od pierwszego wiersza, jeśli pierwszy wiersz Twojej tabeli to nagłówek, początkowe parametry CA oraz CC zmień na numer wiersza, od którego zaczynają się faktyczne dane. Makro działa do momentu napotkania pierwszej pustej komórki w kolumnie C.
Myślę że do twoich celów odpowiednia będzie wbudowana funkcja wyszukaj.pionowo. Ma ona 4 argumenty - pierwszy to wartość szukana, druga to tabela zawierająca dane (może mieć wiele kolumn). Tabela musi mieć w pierwszej kolumnie wiersz w którym będziemy szukać wartości podanej w pierwszej kolumnie. Funkcja znajdzie tą wartość i zwróci z wybrane dane z...
Da się, dla wygody przydatne będzie oprogramowanie do zarządzania centralą i przewód podłączeniowy komputer-centrala, mniej wygodny sposób to programowanie z telefonu przy obserwacji wyświetlacza centrali. Przybliżę drugi sposób. 1. Wejście w tryb programowania #981 klucz (jeśli jest) * Poruszanie się po menu i arkuszach ustawień - 2 góra - 8 dół -...
W sensation nie ma tak latwo. W tym draniu musisz najpierw zrobic S-OFF, a dopiero pozniej kalibrowac. Przy okazji mozesz zerwac locka za friko ;) * Wejdz na stronke : http://revolutionary.io/ - sciagnij pliczek *.exe * Podlacz telefon w trybie debugowania az zainstaluja sie wszystkie drivery * Uruchom programik ( jezeli bedzie Ci sie zamykalo okno,...
Ze względu na "zaszumione" dane zrobienie formuły jest dosyć dużym wyzwaniem, ale można kombinować z makro: [syntax=vbnet]Function Wyjmij(r As Range, n As Integer) As String Const minLen = 5 Wyjmij = "" Dim x, tmp, tmp2 As String Dim v, cn, cg As Integer tmp = "" For Each x In r tmp = tmp & x tmp = tmp & "%" Next x tmp2 = "" cn = 0 cg = 0 For...
To jest przyklad tego jak mozna obsluzyc DS1820 przez mega 8 ale jest tam tez obsluga wyswietlacza w C.Moze sie pryda.Sam to dostalem od jednego kolegi z forum:-) wiec mam nadzieje ze sie nie obrazi...mnie interesowal DS. Pozdrawiam Maciek! #include <avr/io.h> #include <avr/pgmspace.h> #include <stdlib.h> #include <ctype.h> #include...
https://obrazki.elektroda.pl/3754992400_... Witajcie moi drodzy Opiszę tutaj szczegółowo jak można łatwo zacząć przygodę z Home Assistant. Przedstawię jego konfigurację na różnych platformach (Raspberry Pi, Banana Pi, maszyna wirtualna) oraz zademonstruję, jak podłączyć do niego pierwsze urządzenia przez WiFi i przez Zigbee. Wstęp...
https://obrazki.elektroda.pl/8663544600_... We współpracy z TME testujemy i uruchamiamy nowe Integracja Pico2 z Arduino jest bardzo prosta, otwieramy File > Preferences -> Additional Boards Manager URLs i dodajemy url https://github.com/earlephilhower/arduin... https://obrazki.elektroda.pl/1149548700_...
Start --> wiersz poleceń (jako administrator) --> diskpart --> list disk --> sel disk X (gdzie X to numer dysku, którym jest Twój pendrive) --> attributes disk clear readonly Jak nie pójdzie, to prawdopodobnie pendrive umiera :)
(at)simw fajne ale cholernie drogie te 5 cali, może kiedyś. Na razie powoli ogarniam nowy wyświetlacz na nowej bibliotece i jak zwykle idzie topornie, ale już coś widzę. Na razie bez przycisków, enkoderów i samego DACa. Pierwszy wiersz wyświetlacza mam zrobiony z nazwą stacji, numer banku i numer stacji jest od razu w nazwie ściągniętej z githuba z...
Usuń [syntax=vbscript]Columns(2).NumberFormat = "(at)"[/syntax] [syntax=vbscript]Sub elka() With Sheets("Dane") Open Plik9 For Input As #1 numer_wiersza = 1 Do Until EOF(1) Line Input #1, LineFromFile Slowo = Split(LineFromFile, ";") .Cells(numer_wiersza, 1).Value = Slowo(1) If IsNumeric(Slowo(2)) Then .Cells(numer_wiersza, 2).Value = CDbl(Slowo(2))...
(at)kaczmarek2 Innym użytkownikom trudno jest zmienić stan z innego interfejsu użytkownika, moja rodzina zna interfejs HA Obecnie udaje mi się to zrobić w ten sposób Utwórz input_select https://obrazki.elektroda.pl/7606165900_... rest_command w pliku configuration.yaml Dodano po 59 W pliku src/cmnds/cmd_eventHandlers.c, wiersz numer...
Nie rozumiem, co to znaczy, że recovery nie widzi telefonu. Masz włączyć telefon — Android się uruchomi. Włącz wiersz poleceń, odblokuj ekran, podłącz kabel USB i wpisz: adb devices jeśli zgłosi numer seryjny urządzenia, znaczy że widzi telefon. Następnie: adb reboot bootloader Dopiero tutaj robisz: fastboot devices potem fastboot flash recovery recovery.img...
Witam, mam problem z pendrive’em od SanDisk. System i programy widzą go normalnie, ale laptop Dell nie chce go zbootować. W Boot Options pendrive się nie pojawia albo po włożeniu potrafi zawiesić pod... Bezpośrednia odpowiedź Najczęstsza przyczyna to niedopasowanie trybu rozruchu (UEFI/Legacy) i/lub sposób przygotowania pendrive’a (NTFS/UEFI:NTFS vs...
Copilot Windows odpowiedział: 🛠️ Jeśli Twój dysk pokazuje komunikat „Dysk jest w trybie offline z powodu zasad ustawionych przez administratora”, najczęściej chodzi o politykę SAN (Storage Area Network), która blokuje automatyczne montowanie dysków zewnętrznych. Można to naprawić za pomocą narzędzia **DiskPart** w systemie Windows: ### 🔧 Krok po kroku:...
https://obrazki.elektroda.pl/8440835000_... Jak to się stało? Posiadam dostęp do konta bankowego, w sumie sam je założyłem, jednak nie jest ono na moje dane, to jakiś inny mężczyzna. Jestem zabawny, pulpit posiada dwie ikony: kosz(wiadomo) i nad nim folder ,,zlew". W zlewie trzymam pliki .txt z rekordami login::pass do różnych kont:...
http://obrazki.elektroda.pl/2126980700_1... System monitorowania środowiska, oparty o interfejs LoRa IoT składa się z stacji bazowej zbudowanej z wykorzystaniem modułu Arduino Mega z bramką LoRa oraz zdalnych stacji opartych na Arduino Feather, które łączą się z stacją bazową poprzez radiowy interfejs LoRa. System pozwala na monitorowanie...
Przy tak rozbudowanym arkuszu Excel nie będzie działać błyskawicznie. Excel jest programem uniwersalnym, ma różne "wodotryski", które zabierają czas. W tym przypadku pole tekstowe trochę spowalnia, bo ono "jest gotowe" po naciśnięciu każdego klawisza. Gdyby dane wprowadzać do komórki, filtr zaczynałby działać dopiero po 'Enter', więc byłoby szybciej...
excel numer wiersz ipconfig numer wiersz excel usuwa wiersz wiersz
wirowa koniec simlocka orange autronic schemat podłączenia
Zagadki słowne: Co zostało w izbie? APC Smart-UPS 640-0800G_REV07 New 18Ah Batteries Show Only One LED After Self-Test
