Ostatni wiersz i ostatnią kolumnę trzeba określić osobno dla każdego arkusza źródłowego. Ale można wykorzystać te same zmienne, bo raz użyte dane nie będą już więcej potrzebne. Coś takiego: [syntax=vbscript]Dim Workbook1 As Workbook Dim lRow As Long Dim lCol As Long With Workbook1 With .Sheets("A") lRow = .Cells(Rows.Count, 1).End.(xlUp).Row lCol =...
Zrozumiałem (w końcu) :) Kłopotem jest tu ilość tych arkuszy Ex1. Żadna formuła z bezpośrednim wskazaniem komórek źródłowych nie wejdzie bo będzie za długa. Prawdę mówiąc lepiej by było to "łączyć" w accessie. Może zrobić 12 plików pomocniczych z 70 arkuszami i jednym głównym sumującym te arkusze. Każdy z arkuszy byłby połączony z konkretnym plikiem...
[syntax=vb] Sub Wyslij() Dim bs As Range Dim r& Set bs = Sheets("zbiorczy").Range("A:L") r = bs(Rows.Count, 1).End(xlUp).Row + 1 bs.Rows(r) = bs.Rows(1).Value Range("b6:c10").ClearContents End Sub [/syntax]
1. Co i gdzie wyświetla komunikat. Pytanie czy się zgadza. Jeśli tak to przerób: zamiast MsgBox "Kod " & kod & " liczbę: " & baza.Sheets("Base").Ce... 13) & " kopiujemy do " & .Cells(i, kol).Address wstaw przypisanie .Cells(i, kol) = baza.Sheets("Base").Ce...
Panel sterowania -> Kopia zapasowa / Przywracanie systemu. tam to wyłączysz.
Gdy jest numer wiersza z dane('PODAJ.POZYCJĘ'), nie trzeba 'wyszukaj.pionowo', wystarczy INDEKS
Witaj Dodano po 9 albo w arkusz X column B =JEŻELI(LICZ.JEŻELI(Y!A:A;A1)>0;WYSZUKAJ...
Jak masz ustawione bloki DB? Nie mogą mieć Optimized access. Ja używam tak: http://www.elektroda.pl/rtvforum/topic29...
Czy jest jakieś magiczne polecenie, które by kopiowało cały arkusz z jednego pliku zachowując formatowanie? Możesz przykładowo wykorzystać po zaznaczeniu w pliku źródłowym źródłowego arkusza (np. Arkusz1) i kopiować do pliku docelowego (tu Zeszyt1) polecenie typu :spoko: : [syntax=vbscript]Sheets("Arkusz1").Copy Before:=Workbooks("Zeszyt1").Sheets(1)[/...
wiem zobaczymy po formacie jak to będzie działać hehe
Dla mnie dziwne jest to, że system startuje - jest to trochę dziwne, ale też system może po prostu być w mniej zdegradowanych obszarach. 99% danych mam skopiowane z prawami NTFS - napisz jasno, co robisz - kopia posektorowa kopiuje sektor po sektorze ignorując struktury logiczne i związane z plikami uprawnienia, więc w zasadzie nie powinieneś tego...
To powinno pomóc: [url=http://www.goldenline.pl/grupy/Komp...
Excel - automatyczne przepisywanie danych z jednego arkusza do drugiego. Witam, potrzebuję pomocy w programie Excel. Posiadam dane w Arkuszu 1 i potrzebuję, aby po kliknięciu danego klienta, z automatu skopiowały się do drugiego arkusza wybrane dane, jak nr zlecenia, umowy, adres, transport. AI: Jaka wersja programu Excel jest używana? Excel Office...
[url=https://websetnet.net/pl/how-to-ren... nazwy folderu użytkownika
No właśnie takie rozwiązanie jest zbyt proste To może coś (przynajmniej na oko) mniej prostego (ExecuteExcel4Makro) [url=http://www.elektroda.pl/rtvforum/to...
Kopiowany wiersz nie będzie pasował w nagłówki. Musiałoby być (w kodzie arkusza "101-183") coś takiego Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("C2:P50")... Is Nothing And LCase(Target.Value) = "x" Then wrsZrd = Target.Row nazwaArk = Cells(1, Target.Column)...
Czytam to już n-ty raz i... Nie napiszę jak to zrozumiałem, bo (znowu) forumowicze będą mieli ubaw ;) Znalazłem tylko oprogramowaną kolumnę "J" w arkuszu "Przyjęcie próbek" i kopiowanie. Natomiast plik "Kopiuj-Ściskanie" zawiera w "Arkusz1" jakby wzorzec dla arkusza wynikowego, który przecież już istnieje. A może w nim będą wyniki (liczby w wielu wierszach)...
Zobacz jeszcze w DMDE, czy po wejściu na $Noname 01 w $Root masz pliki oraz czy masz błędy odczytu $MFT po wybraniu wszystkie znalezione+rekonstrukcja-->wirtualna rekonstrukcja systemu plików, i czysta rekonstrukcja. Jak będą błędy można je skorygować. Jak w $MFT nie ma już widocznych błędów to można próbować jak pisałem. Chkdsk możesz używać jak chcesz,...
Tak to ja próbowałem przed zadaniem pytania :) Nie udawało się, ale problem już rozwiązany, okazało się że dysk był uszkodzony.
Witam Nie ukrywam że nie znam się na VBA a problem który przedstawie zapewne jest banalnie prosty jednak nie znalazłem podobnych tematów Zadanie Posiadam dwa pliki Exel (Ewidencja jedynek i formatka klienta). Chciałbym przekopiować wybrane dane z formatki klienta do pliku ewidencja jedynek na koniec wolnego wiersza jednak plik formatka będzie zmieniał...
No to zastosuję mix - zacząłem sie bawić rsync'em - i wygląda OK ;)
Nie widzę potrzeby stosowana makr. Formuły i formatowania powinny wystarczyć. Ad.1. Poprawność danych > lista Ad.2. WYSZUKAJ.PIONOWO z argumentem (nazwa arkusza) podstawianym przez ADR.POŚR
Musisz ustawić zmienne odpowiedzialne za bieżący arkusz oraz arkusz z drugiego pliku, a następnie odpowiednio nimi manipulować przy kopiowaniu. Ja to robię zwykle w ten sposób: [syntax=vb] Set wswyn = ThisWorkbook.Worksheets("Wyniki") 'bieżący arkusz Set wrkSrc = Workbooks.Open(Filename:=myPath, ReadOnly:=True) 'otwórz plik źródłowy Set wsSrc = wrkSrc.Worksheets("Dane")...
(Baza Zielone) 1 - nie do końca wiem czy o to Ci chodzi (próbowałem zrozumieć co chcesz osiągnąć - możliwe, że właśnie to co w załączonym pliku). Najprościej będzie posortować po pierwszej kolumnie tak aby puste wartości (matki) zostały na końcu i wówczas do kopiowania danych używasz formuły: 1060144 (Baza Niebieskie) 2 - już napisałem powyżej. Robisz...
Jeśli masz otwarte oba pliki i w nich są wszystkie wymienione arkusze :!: to spróbuj takiego kodu: [syntax=vbscript]Workbooks("cale.xls").A... Sheets("WAC").Select Range("P3").Select Selection.Copy Workbooks("Daily production meeting report.xlsm").Activate Range("B15").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks...
Mogę zmienić, by wszystkie nazwy były takie same w obydwu plikach. Nie możesz, tylko musisz - jeżeli makro ma coś wyszukiwać i dopasowywać po nazwie, taka "radosna twórczość" jest niedopuszczalna. W Prod.xlsx - tabele w Sheet1, Sheet2 i Sheet3 najlepiej, żeby zaczynały się w tych samych komórkach (wiersz, kolumna). Liczba tabel (arkuszy) jest stała...
może zna ktoś sposób na przesłanie dość dużych plików między komputerami które znajdują się w jednej sieci? (Laptop Win 7 połaczony WiFi, stacjonarny XP Pro połączony przewodem RJ45 - w razie potrzeby również laptopa mogę tak podłączyć pod liveboxa), to tak przy okazji bo nie mam pojęcia czy da radę przeskoczyć problemy z tymi torrentami, a pliki te...
Moj kolega Grzegorz ma 100% racje , ale jezeli masz problemy z STL to mozesz to jeszcze prosciej zrobic w LAD uzywajac funkcje MOVE , tylko musisz pamietac o zgodnosci typu zmiennych , ewentulanie odznaczyc sobie w Stepie sprawdzanie zgodnosci typow . Standardowo jest zaznaczona co bardzo utrudnia czasami zycie Pozdrawiam
krzychu.m to nie tak..... jeśli potrafisz tak jak w moim zapytaniu rozszerz przeszukiwania arkusza 2 do WSZYSTKICH wierszy kolumny a. taką formułę też zrobiłem, i przeszukuje 1;1 czyli wiersz 1 z wierszem 1 a powinien za wszystkimi po kolei. czyli na twoim przykładzie jeśli w arkuszu 2 w kolumnie a w poszczególny wierszach będą same 9 to tylko dla dziewiątego...
Jeśli chcesz mieć pewność, że nikt nie zdobędzie logiki Twojego programu, usuń chroniony kod z exe'a i przenieś logikę na serwer zewnętrzny, uzależniając program od internetu. Wtedy program wysyła dane wejściowe na Twój serwer, ten z kolei wykonuje tajemną logikę, którą chcesz chronić, po czym wysyła wynik dla użytkownika. A najlepiej w ogóle zrób aplikację...
od O2:O17 jest Gdańsk I ten zakres kopiujemy do L23, a co mamy zrobić z kolejnym miastem, zakres O18:30? Chcesz się poduczyć, czy oczekujesz gotowca? Jak to pierwsze, to lepiej na jakimś komunikatorze, a nie tutaj.
kopiować dane najlepiej z pliku zamkniętego Poniżej najprostszy (czyli najwolniejszy: 1000 wierszy i 3 kolumny w 45 sekund) mechanizm kopiowania z zamkniętego pliku, wykorzystujący zwykłe odniesienie do pliku na dysku, postaci: 946005 Ps.: Przy wykorzystaniu np. ADO/SQL wyniki szybkościowe na pewno byłyby lepsze, ale mechanizm obsługi bardziej "skomplikowany".
A czy jest możliwość stworzenia makra, które po kliknięciu przycisku stworzy automatycznie arkusze dla wszystkich osób (i nada nazwy takie jak w pierwszej kolumnie tabeli tj. nazwisko i imię), a jeśli arkusz dla danych osób już istnieje, to je pominie. Można np tak: 968207
Najbezpieczniejszy komputer to taki, który nie jest podłączony do sieci. Jak koledzy zauważyli wcześniej można jedynie minimalizować ryzyko. Niestety ilość danych rośnie i coraz bardziej zaczynam się obawiać że kiedyś w podróży dysk się uszkodzi, zapomnę go gdzieś u klienta lub na stacji paliw/w maczku w tracie lub zostanie skradziony a jak wspomniałem...
To po kolei małymi kroczkami. Gdzie jest ten drugi plik? Potrafisz go otworzyć? Jak już otworzysz to zrób pętlę po wierszach i wyszukuj w niej po kolei liczby w drugim pliku. Przyda się zmienna (lub dwie) typu Range. Jeżeli znajdziesz to zapisz kopiowanie odpowiedniego kawałka. Uruchamiaj powoli, sprawdzając wszystko czy działa jak chcesz. Wykorzystuj...
Przyczyną błędu jest tylko to, co napisał adams_nt : powinna być deklaracja typu jak poniżej: Ewentualnie program mógł by sprawdzić czy akrusz B jest otwarty, jeżeli jest nie otwierać go ponownie a jeżeli jest zamknięty otworzyć go. Założyłeś, że Twoje makro będzie kopiować z pliku B.xls aktualnie zaznaczony wiersz - ono nie otwiera pliku [ponownie]....
Prędkość internetu podaje się w megabitach, a prędkość dysku w megabajtach masz. Różnice wygogluj sam ;) Do odpowiedzi dojdziesz sam, po wygoglowaniu :)
http://obrazki.elektroda.pl/4029783300_1... Układu SID (6581 stary i 8580 nowy), będącym muzyczną orkiestrą komputera Commodore 64 nie trzeba nikomu przedstawiać – między innymi dzięki jego brzmieniu owa maszyna osiągnęła tak dużą popularność. Warto tylko przypomnieć, że SID ma jedynie trzy kanały, ale umiejętności programistów...
Witam Workbooks.Add nowy=ActiveWorkbook.Name '....... 'tu kopiowanie a t.d. '........ Workbooks(nowy).Close False Ten kod w petli
https://obrazki.elektroda.pl/8661538600_... Zainspirowany podcastami o historii komputerów (podcast #19 - Magnetofon w służbie informatyki Komputery, nawet wczesne modele z lat 50tych, potrafiły wykonywać obliczenia z niezwykłą prędkością i wydajnością. Wciąż jednak problemem była pamięć. Dostępne formy RAMu mogły pomieścić program,...
Zadaniem jest napisać makro... Wystarczy "zwykła" formuła, jeśli satysfakcjonuje Cię takie rozwiązanie. Coś na wzór: JEŻELI(CZY.BŁĄD(WYSZUKAJ.PIONOWO(...));0... W VBA należałoby zagnieździć dwie pętle dla porównania każdej komórki z każdą...
Wydaje mi się, że poniższą linijkę: Cells(x, 2).FormulaR1C1 = "='[nazwa]WINTER 2010'!R" & y & "C" & 10 & "" powinieneś zamienić na: Cells(x, 2).FormulaR1C1 = "='[" & nazwa & "]WINTER 2010'!R" & y & "C" & 10 & "" i zrób tak w każdej linijce, bo w kodzie...
przydział w grupie A jest zawsze tekst, natomiast w grupie B są zawsze liczbowe? Porównaj D3 - G3, D6 - G6, etc. Bardzo pożądane jednego typu(tekst 109a)
Cześć, Mam następujący kłopot z synchronizacją dużych (a przynajmniej średnio-dużych) ilości danych między dwoma serwerami NAS wewnątrz jednej sieci LAN (docelowo jeden z nich będzie podłączony przez VPN i będzie znajdował się w innym miejscu). Mianowicie chodzi o ilości rzędu 6 TiB danych (ok. 100 milionów plików i hardlinków do plików, dane backupu...
https://obrazki.elektroda.pl/7853440200_... *Icebox thermostat* jest termostatem do lodówki zawierającym mniej i bardziej wymyślne funkcjonalności, przy czym większości z nich z pewnością nie znajdziecie w pospolitych termostatach. Zostały uznane za całkowicie zbędne i pozbawione sensu ;) Konfiguracji termostatu dokonuje się bezprzewodowo...
Pokaż SMART z programu Crystal Disk Info ale generalnie to nie wiem czego oczekujesz? Ten dysk posiada tylko 16MB pamięci cache czyli buforu który jest używany właśnie między innymi podczas kopiowania danych między partycjami. Interfejs SATA II. Większe szybkości można osiągnąć kopiując dane między 2 dyskami.
Czy kopiowanie danych do innej tabeli bazy relacyjnej to dobry projekt Kopiowanie danych do innej tabeli w bazie relacyjnej może być zarówno dobrym, jak i złym rozwiązaniem, w zależności od kontekstu oraz konkretnej potrzeby projektowej. Warto przyjrzeć się kilku aspektom, które mogą pomóc w ocenie, czy taka praktyka jest odpowiednia w Twoim przypadku....
https://obrazki.elektroda.pl/9873515400_... Zapoznanie z bohaterem Dzisiaj zapraszam na wycieczkę po meandrach dzieła sztuki, które to zostało stworzone w okolicach roku 1992 przez inżynierów firmy SONY, a nosi nazwę MHC-4700. Prezentowany eksponat jest wieżą w formacie midi składającą się z 4 “klocków” oraz 4 'głośników'. Ponieważ...
Jak sprzęty Apple wzajemnie się uzupełniają? Przegląd dostępnych możliwości Sprzęty Apple zostały zaprojektowane z myślą o wzajemnej współpracy, co zapewnia płynne przejście pomiędzy urządzeniami, synchronizację danych, a także wygodę użytkowania. Dzięki takim funkcjom jak iCloud, Handoff czy AirDrop, tworzą spójne środowisko, w którym użytkownicy...
Nie warto kupować tanich dysków, bo z reguły dość szybko kończą swój żywot. Osobiście polecam dyski firmy Samsung, tylko wersję EVO. Ile tanich dysków już zajechałeś? To mój pierwszy dysk SSD, użytkowany praktycznie codziennie przez ponad 7 lat, kupiony dosłownie za parę groszy, czyli był tani. https://obrazki.elektroda.pl/6073533200_...
kopiowanie danych między arkuszami kopiowanie danych między komputerami kopiowanie między
renault laguna pasek rozrządu gotowanie płynu chłodniczego trzaski optyku
Zamienniki E100D i E174D RFT DDR – odpowiedniki TTL 7400, 7474, UCY7400, К155ЛА3 MTD traktorek – regulacja równoległości i pochylenia platformy tnącej, ustawienia decku