Proszę jaśniej. Nazwa arkusza ma być pobierana z komórki, czy w komórce ma być odwołanie do nazwy arkusza? W jakim celu?
Program, jest częścią jednego większego, a nie ma sensu tu podpinać całości. Zatem trochę go zmodyfikowałem i wyciąłem najważniejszą rzecz. Faktycznie źle się tutaj określiłem za co przepraszam. Z załącznikach podsyłam zdjęcia błędu, który się pojawia. Program (działa) ładnie zapisuje gdy w nazwie klienta nie ma KROPEK. Wystarczy, że kropka jest w dowolnym...
ok - bardzo ciekawa opcja jeżeli rozchodzi się o brak VBA. jednak jak by to wyglądało gdybym chciał to wmieszać w język VBA ? Ponieważ w przypadku dużej ilości danych wersja bez makra będzie powodowała dużą ilość formuł oraz zwiększanie się wielkości pliku excel. Przykład w załączniku zgrywania danych gdy mamy dwie wartości podane - czy da się ten kod...
Witam, stworzyłem arkusz do gry cashflow, wszystko ładnie działa, ale chciałbym wprowadzić jeszcze jedną funkcję, niestety nie wiem jak. Chodzi dokładnie o to, że jak wprowadzam z listy rozwijalnej nieruchomość, to pojawia mi się jej nazwa we wszystkich potrzebnych miejscach, wystarczy, że wpiszę cenę zakupu, wkład własny itp. i wszystko jest ok. Natomiast...
Moje poszukiwania w Googlach nie dały rezultatu. Na tym forum również nie znalazłem odpowiedzi pomimo że są tematy zbliżone do mojego problemu. Co ciekawe na innych forach również nikt nie wie jak to zrobić. Chciałbym Was tu prosić o pomoc jak to można zrobić. Chodzi mi o zbudowanie makra do zliczania z komórek znajdujących się w innych plikach. Założenia...
Cześć, mam napisane makro do wgrywanie danych z pliku typu .csv. Wszystko mi się przegrywa tak jak chce (jeżeli rozchodzi się o miejsca) Jednak zauważyłem jeden problem - polskie znaki znikają, a format godziny np. 00:10 zamienia mi się na dane np. 0.3456. Czy ktoś może wie czemu tak się dzieje i jak to rozwiązać?? [syntax=vb]Sub Przycisk1_Kliknięcie()...
cześć, napisałem makro które kopiuje mi dane z nowo otwieranego pliku do tego, które chce. Tylko że robi to w wersji jeden do jednego, a ja potrzebuję rozwiązania na przesunięcie tych danych do innej kolumny tak aby dane nie były wklejane dla mnie w kolumnie A tylko B. Macie jakieś proste rozwiązanie na to? [syntax=vb] Sub Makro1() ' ' Makro1 Makro...
Użyj funkcji [url=http://office.microsoft.com/pl-pl/e... i wytnij z jej wyniku nazwę arkusza.
Witam, Parę godzin szukania i nic, więc postanowiłem się poradzić. Potrzebuję stworzyć następujący arkusz: W Arkuszu1 w poszczególnych komórkach będą znajdowały się nazwy kolejnych arkuszy. Na Arkuszu1 będzie przycisk, który po przyciśnięciu przejdzie do tego arkuszu, którego nazwa będzie 'podświetlona'. Czyli po kliknięciu na komórkę z nawą arkusza...
Możesz również pobawić się funkcją INDIRECT.EXT ale wiąże się to z zainstalowaniem dodatku.
Bezproblemowo zaznacz właściwe zakresy i zdefiniuj dla nich nazwę.
Tu jest szczęście[syntax=vb] Sub KopiaRobocza() Dim nazwa As String Dim path As String nazwa = Range("H19").Value path = "C:\" fileSaveName = path & nazwa & ".xlsx" ThisWorkbook.Worksheets("Kopia robocza").Range("A1:D45").Copy Workbooks.Add Selection.PasteSpecial Paste:=xlPasteValues ActiveWorkbook.SaveAs fileSaveName Application.OnKey "~", "SomeActions"...
arkusz i zapisał go w tym samym skoroszycie ale pod nazwa wzięta z komórki. Następnie zapisał by plik w określonym miejscu z nazwa rownież z określonej komórki. Napisz do wyjaśnienia adresów tych komórek. Ponadto sciezku dla zapisu Dodano po 1 [syntax=vb] Sub Kolejny_dzen() Sciezka = "D:\tmp\" '- to dopasuj do swoich potreb plik = Sciezka & Format(Int((Date...
Tak na szybko Jeżeli możesz zmień "-" (minus) w nazwie arkusza na np "_" kreska dolna Oczywiście w komórce C4 też. "Agregaty-inne" na "Agregaty_inne" Jeżeli koniecznie ma być minus zaraz sprawdzę jak w tym przypadku zareaguje funkcja adres() tylko że tam jest inny rodzaj adresowania komórki.
W miejsce 'Sheets("Sheet2").Select' umieść wstawianie arkusza (Sheets.Add) i nadanie nazwy (Activesheet.Name). Jeśli wartości w kopiowanych komórkach nie są unikatowe, musisz najpierw sprawdzić czy arkusz z taką nazwą istnieje.
Czyli ustawiasz kursor w którymś z wierszy, naciskasz przycisk i ma się dodać wg wartości w tym wierszu? Oj, żebyś żonie nie uprzykrzył ;) Nie rozsądniej byłoby zrobić to za pośrednictwem formularza? Wybierasz z pól kombi (stan w podglądzie) i dodajesz pod przyciskiem. Update 7:50 Coś jak w załączniku. W ostateczności wykorzystaj makra...
Trzeba znać nazwę arkusza. Nabela odpowiada rzeczywiste Zdjęcia w #1 ?
Pomogę w ten sposób: Tak przypisujesz nazwę z danej komórki Nazwa_z_komorki = Worksheets("KON").Cell... 1).Value i podobnie ilość Ilosc_z_komorki = Worksheets("KON").Cell... 2).Value Do powyższego cells(nr wiersza,nr kolumny) dodanie arkusza: Sheets.Add Nadanie nazwy arkuszowi: ActiveSheet.Name...
To trzeba wykonywać program krokowo i gdy wystąpi błąd sprawdzić wartości wszystkich zmiennych. Opis błędu wskazuje, że nie ma arkusza o wskazywanej nazwie, więc trzeba dokładnie sprawdzić jakie są nazwy arkuszy, a co jest w komórkach. Jeśli nie znajdziesz sam przyczyny błędu, załącz przykładowy plik, bo tak to można tylko zgadywać.
Witajcie, Może ktoś ma rozwiązanie takiego problemu, a mianowicie.. Mam plik xls z 3ma arkuszami (nazwy miesiąca) w powiedzmy 4rtym arkuszu chcę zdefiniowac polę "nazwa" , gdzie będzie ono nazwą arkusza z którego chce skopiować wartość, oraz "wartość" - wartość pobrana z arkusza o nazwie zdefiniowanej w polu "nazwa". chodzi o jakiś sposób aby formuła...
Kiedyś robiłem taką funkcję ale gdzieś mi uciekła mam nadzieję że mi pomożecie w tym temacie. mam listę arkuszy chcę użyć nazwy i dodać komórkę odniesienia aby pobrać dane np. Arkusz1 ----> =Arkusz1!F9 Arkusz2---->=Arkusz2!f9 Dobrze by było jakby z 2 komórek pobierał dane lub używał funkcji wyszukaj.pionowo
Witam, problem polega na tym, że posiadam dwa spore pliki w programie excell 64 Mb i 66 Mb. W każdym z plików, w każdym z wierszy znajdują się w osobnych komórkach NAZWA i szereg odpowiadających im wartości liczbowych. W jednym pliku mam 27 tys. wierszy na 102 kolumny, w drugim podobnie, przy czym niektóre nazwy w obrębie danego pliku się powtarzają,...
Excel - Dynamiczna nazwa arkusza, definiowana przez komórkę z polem kombi (rozwijanalista) Cały dzień próbuje utworzyć formułę która pozwoli mi zmieniać arkusze wraz ze zmianą wartości w komórce na liście, niestety cały czas pojawia się jakiś błąd w formule. O co chodzi: Terminy.jpg - Widzimy tu główny plik excel zarządzający bazą danych. http://obrazki.elektroda.pl/4456116100_1...
Dzień dobry wszystkim zaawansowanym programistom :) Zdecydowałem się poprosić o pomoc, bo sam nie mogę sobie poradzić, mimo upartego czytania różnych stron i forów na temat vba w excelu. Po wielu kombinacjach, które doprowadziły mnie "nigdzie" pomyślałem, że są ludzie, którzy chętnie pomagają przy tego typu sprawach. Chodzi mi o to, aby zapisać plik...
Witam. Mam trywialne zagadnienie: W jaki sposób zmusić excella do wpisania nazwy pliku w dowolnie wskazanej komórce ? pozdrawiam. R.Wieczorek
Witam Pracuję codziennie z takim samym plikiem excell posiadającym jeden arkusz, aczkolwiek za każdym razem nazwa tego arkusza się zmienia. Aby zautomatyzować sobie dalszą obróbkę danych potrzebuję makra, które zmieniałoby tę nazwę na nazwę wybraną przeze mnie. Dzieki
witam nie radze sobie z argumentami. chciałbym: - nadać dodanemu arkuszowi nazwę która będzie w textbox. - "veryHiden". proszę o pomoc, oto co dotychczas udało mnie sie.... : [syntax=vb]Private Sub okBtn1_click() Dim strName As String, Response As Action strName = TextBox1.Value If Name <> "" Then ActiveWorkbook.Sheets.Add After:=Sheets() ' ?????...
Witam, Bardzo proszę o pomoc, potrzebuję zrobić makro, które skopiuje z arkusza "wydruk" komórki z kolumny C (numer księgowy) i przeniesie je do arkusza "Zobowiązania" do kolumny F (numer księgowy), ale posegreguje wpisy zgodnie z kolumnami "numer faktury". W obu arkuszach są te same dane w wierszach ale w innej kolejności, w arkuszu wydruk nadawane...
Cześć, Chcę stworzyć procedurę, która ukrywałaby odpowiednie arkusze w zależności od nazwy użytkownika. Napisałem taki kod: [syntax=vb][/syntax]Option Explicit Private Sub przyblokuj() Dim arkusz As Worksheet For Each arkusz In ThisWorkbook.Sheets If arkusz.Name <> "" And Application.UserName = "azun" _ Then Sheets(arkusz).Visible = True _ Else...
A jak dokładnie są nazwane arkusze? Cała data, czy tylko numer dnia? Jeżeli cała data to: Sub NazwaArkusza() Range("a2") = ActiveSheet.Name End Sub przy numerze dnia: Sub NazwaArkusza() Range("a2") = ActiveSheet.Name & ".02.2011" End Sub To jest tylko dla jednego arkusza. Dla większej ilości...
Dzień dobry, Jeżeli położenie komórek jest stałe, to znaczy w kolejnych komórkach ma Pan tekst oryginalny (w przykładzie A1), wynik (w przykładzie B1) i położenie "X" w tekście wynikowym (w przykładzie C1) może Pan nadać nazwy swojej formule oraz jej parametrom (zgodnie z zasadami Excela). Można to zrobić w Menedżerze Nazw (Excel >= 2007) lub przez...
Użyłem tego makra we wszystkich od 01.YY do 13.YY i tylko pierwszy skopiował dane. W załączniku przesyłam cały plik, może będzie łatwiej rozwiązać zagadkę Już z tego miejsca pragnę bardzo podziękować za pomoc, ale chciałbym sprawę doprowadzić do końca. tak czy siak nie we wszystkich skoroszytach ci to zadziała musisz trzymać się jednej nazwy arkuszy...
Może być takie proste rozwiązanie bez VBA - patrz załącznik. W komórce B1 jest zwykła lista rozwijana kontroli poprawności. Dane można wpisać wprost do okienka kontrolki. W komórkach B2:B3 definiujemy kontrolę poprawności z listą zdefiniowaną za pomocą formuły nazwanej (w Menedżerze nazw). Zestaw odpowiedzi musi być zakresem w arkuszu. Jeśli są to te...
Zerknij do załącznika. Kod w arkuszu + UserForm. Kod uruchamia dwuklik w zakresie E2-E22 ;)
[syntax=vbscript]nazwa = ActiveCell.Value With ThisWorkbook .Sheets("wzor rodzinne").Copy ActiveWorkbook.SaveAs .Path & "\rodzinne\" & _ nazwa & ".xls" ActiveWorkbook.Close End With[/syntax]
W załączniku przykład listy z podpowiedzią zrobiony formułami. Dwie formułki w Menedżerze nazw. Możliwe są 2 warianty. Odpowiednie formuły są pokazane w Arkuszu2. Albo wyszukiwanie po dowolnym fragmencie albo po początku nazwy. Do komórki z listą wpisać hasło i wtedy rozwinąć listę (nie trzeba naciskać Enter).
szablon.SaveAs Filename:=sciezka Proponuję użyć SaveCopyAs. Ale nie wiadomo, czy makro (jego nazwa sugeruje tworzenie arkuszy), czy też ma tworzyć nowe pliki.
Powinieneś załączyć przykładowy plik Excela, bo za dużo jest niejasności w tym, co napisałeś. Przykładowy kod, który działa wg Twojego opisu: [syntax=vbscript]Sub AddSheets() ' zakładamy, że nazwy nowych arkuszy ' są w komórkach od B5 w dół Dim ostw As Long, w As Long ostw = Arkusz1.Cells(5, 2).End(xlDown).Row For w = 5 To ostw Sheets.Add(After:=Sheets(Sheets.Count))....
to makro do "zabawy" Dodano po 2 jeszcze dwie wersje.... Pierwsza ile_wierszy, to może być niemal dowolna liczba sprawdzonych wierszy , można wpisać nawet tyle ile wierszy ma cała kolumna (zależy od wersji Excela) Chodzi o to by nie sprawdzać całej kolumny bo to może potrwać.... Skopiowane zostaną tylko niepuste komórki. [syntax=vba] Sub copy_cells()...
Powinieneś dodać własny skoroszyt jako przykład, co chcesz osiągnąć, bo w Excelu różne drogi prowadzą do celu. W każdym razie jeśli używasz funkcji ADR.POŚR, to jej pierwszy (a często jedyny) argument musi być w cudzysłowie - jeśli oznacza adres, z którego chcemy pobrać dane. Natomiast bez cudzysłowu - jeśli to jest komórka, która dopiero zawiera potrzebny...
z kilku innych arkuszy Z arkuszy, czy ze skoroszytów? Jeśli z arkuszy (w tym samym skoroszycie) to wstawiasz nazwę arkusza, wykrzyknik i odnosisz się do jego zakresu/komórki. Np. w ten sposób odwołasz się np. do A1: [syntax=vb]=Arkusz1!A1[/syntax] Jeśli ze skoroszytów, to tutaj wyjaśnienie: http://office.microsoft.com/pl-pl/excel-...
Sposobów na otwarcie pliku w VBA jest wiele. Można użyć: [syntax=vbnet]Pthnm = ActiveWorkbook.Path Workbooks.Open Pthnm & "\TMP.xlsx"[/syntax] a nazwę pliku podać przez InputBox lub pobrać z jakiejś komórki w arkuszu. Inny sposób to użycie FileDialog i wybranie pliku przy jego pomocy. Wybór należy do Ciebie.
lecz widoczny wynik to sam wiersz Sumy A jaki zakres komórek obejmuje nazwa Cena :?: :D Jeśli chcesz sumować "tylko widoczne" - zmień formułę na =SUMY.CZĘŚCIOWE(9;[Cena]) :idea:
Witam ,chociaż już po Świetach to życzę zdrówka wszystkim. A co do problemu z jakim się zwracam to potrzebuję do pliku załączonego aby dołożył ktoś makro lub formułe, w zależności czym będzie lepiej uzyskać efekt ,który przydałby mi się na co dzień. Mianowicie w skoroszycie mam kilka arkuszy z nazwą powtarzającą się w kolumnach "B". Po otwarciu skoroszytu...
Pozwolę sobie odpowiedzieć: zmień deklaracje typu zmiennych i będzie ok. Dim Nazwa_1 As Integer Dim Nazwa_2 As Integer Na Dim Nazwa_1 As String Dim Nazwa_2 As String Integer to liczby całkowite a String to ciąg tekstowy do którego też można zaliczyć "wizualnie" liczby (czyli liczby i cyfry jako tekst). I jeszcze jedno jak zmienić aby nazwy arkuszy zmieniały...
Ale nie rozumiem jak jest z zapisem liczby z kalkulatora do jakieś komórki w arkuszu Jak można nie rozumieć, że ty sam napisałes? To znaczy: Z pierwszego arusza "Sheets(1)" odczytaj komórkę A1 i dodaj do niej liczbę z TextBox1 ("TextBox1.Value" = przekształć tekst na liczbę). Wynik zapisz do pierwszego arkusza "Sheets(1)" do komórki A1 = "Range("A1")...
Nie jestem pewien, czy dobrze zrozumiałem Twoje oczekiwania, ja bym to ułożył w postaci skoroszytu zawierającego kilka prawie identycznych arkuszy (arkusz1 i arkusz2) oraz trzeciego arkusza sprawdzającego zgodność analogicznych komórek w dwóch pierwszych arkuszach (czyli np. komórki A1 w arkuszu1 z komórką A1 w arkuszu drugim). Możesz tu użyć nieco...
Dzień dobry, Problem można rozwiązać za pomocą formantu ActiveX typu Obrazek. Należy wstawić formant do arkusza (robi się to różnie zależnie od wersji Excela) i zapamiętać jego nazwę. Jeśli jest to pierwszy obrazek, będzie miał nazwę Image1 (nazwę widać w polu nazwy). Teraz trzeba przygotować plik do wstawienia do formantu. W zależności od tego jak...
wykorzystaj formułę wyszukaj.pionowo() w komórce B2 w drugim arkuszu wpisz: [syntax=excel]=WYSZUKAJ.PIONOWO(A2;Arkus... Arkusz1 w formule to nazwa pierwszego arkusza.) Daj enter a potem przeciągnij formułę w dół i już. Ewentualnie możesz wpisać warunej jeżeli gdy nie będzie danej z kolumny A drugiego arkusza w arkuszy pierwszym:...
Ten plik działa prawie poprawnie. Jedyne, co mi się rzuciło w oko to brak nazwy magazynu na arkuszu. Powód: Range("J1").Select ActiveCell.FormulaR1C1 = x Range("H1:M1").Sel... "x". Wyszukiwanie arkuszy OK.
Istnieje kilka sposobów zapisu odwołań do zakresów komórek w różnych arkuszach. Odwołanie bezpośrednie w stylu Excela: [syntax=vbscript]Range("'Samochód części automatic (2)'!B2#")[/syntax]Nazwa arkusza jest fragmentem adresu zakresu. Nazwę arkusza umieszczamy w apostrofach jeśli zawiera spacje, znaki specjalne lub jest liczbą; oddzielamy od adresu...
Pole tekstowe, jak sama nazwa wskazuje, zwraca w wyniku tekst. Jeśli taki tekst wpisujemy do komórki arkusza, czasem Excel na podstawie formatowania potrafi rozpoznać właściwy typ danych (np. rozpoznaje czas), ale nie zawsze tak będzie. Jeśli Excel nie potrafi samodzielnie dokonać konwersji, trzeba mu dopomóc i zastosować w kodzie VBA jedną z funkcji...
Przykład korzystania z okna zapisywania z filtrem ZapiszJako = Application.GetSaveAsFilename(fileFi... Excel (*.xls), *.xls") I jeśli domyślna ścieżka i nazwa z komórki to sciezka = Application.DefaultFilePath & "\" nazwa = Range("A1").Value ZapiszJako = Application.GetSaveAsFilename(Initia...
Wszystko to chyba jest dość proste, tylko przedstawione w jakiś dziwnie zagmatwany sposób. Po pierwsze nadal nie jest jasne czy masz jeden plik czy dwa pliki. W pierwszym pliku jest Makro1. Wywołujesz to makro w kodzie, który nie ma nazwy, bo nie pokazałeś całego makra, tylko kawałki. I teraz czy ten kod bez nazwy jest w osobnym pliku, ale z takimi...
Witam, załóżmy że mam skoroszyt z dużą ilością arkuszy które noszą nazwę od 1 do 100. Chciałbym dodać jeszcze jeden który nosiłby nazwę np. Szukaj, w którym po wpisaniu załóżmy w komórkę A1 nazwy jednego z arkuszy excel przeniósł mnie do tego arkusza. Chciałbym również aby po wpisaniu nazwy arkusza który nie istnieje wyskoczył komunikat że arkusz o...
Powiem tak na szybko: :) Znaj moje dobre serce :) W załączeni przykład z różnymi układami. Wybierz który ci pasuje ewentualnie połącz w jedno. Ponieważ jest możliwość wielu wystąpień jednego tematu na chwilę obecną nie wiem jak to ugryźć bez wiersza pomocniczego (wiersz 2 - ukryty w arkuszu1 [komórka kopiowana w bok - w prawo]) I druga rzecz w w funkcji...
Sprawdz czy aby na pewno stosujesz odpowiednią nazwę arkusza. Czy nie ma literówki itp. Jeżeli prawidłową nazwę arkusza ujmiesz w cudzysłowiu to musi działąć nawet ze spacjami i innymi znakami które pozwolą się wpisać w nazwie. Chyba że błąd dotyczy czegoś innego np. arkusz jest ukryty lub komórka chroniona
Sądząc po nazwie ("Polewyboru") to nie ActiveX tylko formularzowe. Wykorzystaj wartość komórki wpisanej jako "łącze komórki"... P.S. Na końcu procedury włącz odświeżanie ekranu.
Dlaczego nie chcesz użyć programu do fakturowania?
Nie jest dla mnie to jasne. O ile kryteria stworzenia arkusza są jasne (bo jest on tworzony na podstawie formularza - i podejrzewam że arkuszy może być kilka) - to na jakiej podstawie ma być wybierany arkusz? Też na podstawie nazwy z formularza? W każdym razie FormulaR1C1 albo Value możesz zastosować do komórki w dowolnym arkuszu, nie tylko bieżącym:...
excel nazwa arkusz komórka nazwa komórka nazwa arkusz nazwa arkusz komórka
dział medyczny brotje energy błędy backup manta
bateria milwaukee serwis komputerowy
Audi A1 felgi aluminiowe 17 cali – opłacalność naprawy przytarć po bokach Zawór AquaStop do zmywarki Siemens SF24M230 – numery części, kompatybilność, montaż
