visible false

[C++] Jak zdefiniować i używać funkcję w wielu miejscach programu?

Funkcja musi być zadeklarowana np. w klasie TForm1. Robisz to następująco: 1. W miejscu, gdzie masz rozpisane klasy używane przez twój program (drzewo, które zaczyna się od "Project1-Classes") znajdujesz "TForm1" 2. Pod prawym przyciskiem myszy masz NewMethod 3. Wpisujesz jakie parametry chcesz do funkcji przekazać i co ma zwracać. Będzie to wyglądało...

Wyświetlanie się podpowiedzi w "chmurce" VB

Nie. Mozna dodac w dowolne miejsce obrazek(dymke) Visible=false; w zdarenie textBox_MouseMove wpisac ten obrazek visible=true, tylko potem trzeba jeszcze z powrotem to schowac(klik na dymkie, textBox, formie)

Nie znalazłeś odpowiedzi? Zadaj pytanie Sztucznej Inteligencji

[VBA] - Jak zmodyfikować makro kopiujące dane z ukrytego arkusza?

[syntax=vbscript]Application.ScreenUpdat... = False If Not Sheets("Arkusz2").Visible Then Sheets("Arkusz2").Visible = True Sheets("Arkusz2").Select Range("A2:E10").Select Selection.Copy Sheets("Arkusz1").Select Range("a1").Select ActiveSheet.Paste Application.CutCopyMode = False Sheets("Arkusz2").Visible = False ActiveWorkbook.Save Application.ScreenUpdating...

Excel - zabezpieczenie poszczególnych arkuszy hasłem

[syntax=vbscript]Private Sub Workbook_Open() For x = 2 To Sheets.Count Sheets(x).Visible = False Next a = InputBox("Podaj hasło:") For x = 2 To Sheets.Count If Sheets(x).Range("AA1") = a Then Sheets(x).Visible = True Next End Sub[/syntax]

Jak utworzyć niezależne okno z przyciskami w Delphi/Builder?

zrob tak: - stworz do projektu nowy form - daj przyciski itp - jak chcesz wysolac to: form2.visible:=true; jak schować to: form2.visible:=false; lub form2.showmodal

[Borland C++] Login i hasło,uruchamianie pliku exe.

Tak, jest bardzo chaotycznie i nie wiem czy chodzi o banalne rozwiązanie jak poniżej czy chodzi też o coś poważniejszego... if (UserEdit->Text == "admin" && PassEdit->Text == "qwerty") { LoginPanel->Visible = false; AdminPanel->Visible = true; }

Tytuł: Pomoc w tworzeniu makra do drukowania wybranych zakładek z listy rozwijanej w Excelu

Tam zapewne brakuje Else (nie testowałem): [syntax=vbnet]Sub Printing() Target = Sheets("Centrum").Range("G7").Value If Target = "All" Then For Each s In Sheets(Array("GREEN", "BLUE", "YELLOW", "GREY", "BLACK")) s.Visible = True s.PageSetup.PrintGridlines = True s.PrintOut Copies:=1, Collate:=True s.Visible = False Next Else With Sheets(Target) .Visible...

Jak uniknąć zmian nazw przy imporcie danych? C#, SQL, DGV.

Dane z bazy nadpisują nazwy kolumn "swoimi". Ja sobie radzę z tym tak: (po załadnowaniu danych) [syntax=csharp] // visible dgv1.Columns["Id"].Visible = false; // headertext dgv1.Columns["DataProdukcji"].HeaderText = "Data produkcji"; [/syntax]

[C#] Windows Forms: Kolumny DataGrid widoczne po ponownym otwarciu formy

Miałem kiedyś ten sam problem i o ile dobrze pamiętam to był to jakiś bug w kontrolce. Obszedłem go w ten sposób, że ustawiłem jako pierwszą widoczną kolumnę, albo ukrtywałem ją ustawiając .Columns[0].Visible = false w jakimś zdarzeniu, bodaj BindngComplete...

Jak dodać funkcję sumowania w makro do programu Excel?

Znalazłem "błąd". Ponieważ przykład z funduszem robiłem na liczbie całkowitej (555) zapomniałem/nie zwróciłem uwagi że liczba z przecinkiem dla VB jest z kropką. Później kod próbuje to dalej konwertować i występuje różnica typu. Wystarczy pobrać z funduszu remontowego tekst wartości Text .TextBox5.Visible = True .TextBox5.Enabled = False .Label6.Caption...

[Excel] Jak odkryć ukryty plik przez Application.Visible = False

Alt+F11( w formie - Ctrl+Break) Ctrl+G(jesli nie ma okienka Immediate) w tym oknie Application.Visible=True

[C#] Jak dynamicznie edytować kolumny DataGridView w C# z poziomu aplikacji?

Możesz np. z poziomu designera dodać wszystkie kolumny, a potem ukrywać niepotrzebne, a pozostałym ustawić kolejność właściwością DisplayIndex: [syntax=csharp]dataGridView1.Columns[0].... = false; dataGridView1.Columns[3].DisplayIndex = 0; dataGridView1.Columns[2].DisplayIndex = 1; dataGridView1.Columns[1].DisplayIndex = 2;[/syntax] A generalnie:...

[VS 08: VB; Expression Blend 3] TabControl -pionowe zakładki

Hmmm, to można rozwiązać przynajmniej na dwa sposoby: 1.) Bardziej skomplikowany, ale i bardziej profesjonalny: tworzysz własną kontrolkę na podstawie TabControl, w DrawMode wybierasz OwnerDrawFixed i podpinasz swoje własne metody rysujące kontrolkę w zdarzeniu OnPaint. Po szczegóły musiałbyś pogooglać jak tworzyć własne kontrolki w języku w którym...

Access - jak ustawić maskę wprowadzania dla liczb 1-6?

Tak. Grupowanie raportu wg. nazwiska i wstawiony znak podziału strony w szczegółach raportu lub tyle tekstu pochwały lub nagany by zajęło całą lub ekonomiczno-ekologicznie określoną część strony (dwóch, trzech na stronę i wydruk do pocięcia). Warunek w polu tekstowym raportu: iif([procent]=1;"tekst pochwały";"tekst nagany") Dot. Liczb i procentów w...

[Delphi] Jak wczytać obrazek z dynamicznej ścieżki w aplikacji?

Możesz co najmniej na trzy sposoby właściwie, najzwyczajniej: Image1.Picture.LoadFromFile('podfold... lub (. to katalog bieżący) Image1.Picture.LoadFromFile('.\podfo... lub (chyba najpewniejszy) var dir: String; begin dir := ExtractFilePath(Application.ExeName&... Image1.Picture.LoadFromFile(dir...

Excel VBA - Makro pokazywania i ukrywania arkuszy przy logowaniu

Dzień dobry W pliku z makrem logowania chciałbym dodać funkcję ukrywania oraz pokazywania arkuszy pliku na podstawie danych z komórek w danym arkuszu (Arkusz "Ustawienia"). Wyświetlanie wybranych arkuszu miałoby nastąpić po prawidłowym zalogowaniu się. Obecnie wygląda to tak: [syntax=text]Private Sub Loguj_Click() Dim sUser As String, sPassword As String...

VB 2012 - Jak zablokować nawigację strzałkami między buttonami?

Jak to zrobić ? Dodajesz trzeci przycisk tyle że "Visible=false" i tworzysz takie eventy: [syntax=vbnet] Private Sub Button_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Button1.KeyPress, Button2.KeyPress Button3.Select() End Sub Private Sub Button_KeyUpDown(ByVal sender As System.Object, ByVal e...

[MS ACCESS] Właściwość Visible - jak to działa?

Visible jest typu boolean, czyli może przyjąć jedną z dwóch wartości. Spróbuj Np Private Sub ctldok_otrzymane_AfterUpdate() If Me.ctldok_otrzymane = "1" Then Me.ctlj_inne.Visible = True Me.ctl_j_kwota.Visible = False Me.ct_j_miesiac.Visible - False ElseIf Me.ctldok = "2" Then Me.ctlj_inne.Visible = False Me.ctl_j_kwota.Visible...

VBA - wyszukiwanie tekstu w arkuszu Excela podanej w TextBox

Próbowałam, [syntax=vb]Private Sub OptionButton1_Click() If OptionButton1.Value = True Then ComboBox24.Visible = True TextBox7.Visible = True Frame4.Visible = True OptionButton3.Visible = True OptionButton4.Visible = True Else ComboBox24.Visible = False TextBox7.Visible = False Frame4.Visible = False OptionButton3.Visible = False OptionButton4.Visible...

[EXEL] Jak ustawić filtr w VBA dla dwóch wartości w tabeli przestawnej?

Cześć, Mam problem z tabelą przestawną, ponieważ dane jakie jej pokazuje są zmienne. Czy jest możliwość ustawienia takiego warunku żeby w filtrze zaznaczał tylko dwie wartości a resztę oznaczała jak False. Chodzi mi o tą cześć kodu poniżej: [syntax=vbscript]With PT2.PivotFields("status") .Orientation = xlPageField .PivotItems("CC_Należność uregulowana").Visible...

C# konwersja zmiennej odebranej przez RS232 na liczbę.

Ale kombinujesz... przeglądnij to to może sam dojdziesz dlaczego CI nie działa (parę zbędnych rzeczy jak dla Ciebie ale może się połapiesz.) [syntax=csharp]using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Threading.Tasks; using System.Windows.Forms;...

[VBA Excel] Jak skrócić/sprawnie poprawić ten kod?

Ad.1) Procedurę, (obecnie wywoływaną po kliknięciu na TxtBox), musisz przypisać do kontrolek (procedur) , których wywołanie ma wyświetlić (odświerzyć) wynik w TxtBox. Ad.2) Użyj właściwości Visible tej kontrolki (false/true) , w zależności od wartości właściwości Catpion. andie

VBA Excel: Otwieranie arkuszy według użytkownika systemowego

chodziło mi o coś takiego. pozdrawiam [syntax=vbscript]Private Sub Workbook_Open() Select Case Environ("username") Case "user1" Sheets(1).Visible = true Sheets(2).Visible = false Sheets(3).Visible = false Case "user2", Sheets(1).Visible = false Sheets(2).Visible = true Sheets(3).Visible = true Case "user3", Sheets(1).Visible = true Sheets(2).Visible...

VBA Excel - Ukrywanie formantów - w zależności od wartości komórki warkuszu

Pomijając literówkę w przypisaniu, zamienione argumenty w Cells(row, column), zakręcony wybór kontrolki w pętli, to zdaje się coś za dużo tych pętli. Po modyfikacji http://obrazki.elektroda.pl/3585684200_1...

[Delphi] Jak dodać podliczanie punktów w teście w Delphi?

Otóż zrobiłem sobie program wzorując się na innych podobnych test w delphi i mam taki drobny problem bo nie za bardzo wiem jak dodać do niego podliczanie punktów. Mam taki pomysł żeby za dobra odpowiedź przyjmowało wartość 1 a za złą 0 i na koniec sumowało i pokazywało wynik o to kod programu: unit Unit1; interface uses Windows, Messages, SysUtils,...

Excel - Blokowanie przycisków w zależności od daty i czsu

Witam dla arkusza "Objednavka" [syntax=vb] Private Sub Worksheet_Change(ByVal Target As Range) ''Sheets("Objednavka") If Target.Address = "$J$4" Then idate = Date - DateValue(Me.Range("J4")) Select Case idate Case Is > 1 cmbStav.Visible = False: cmbObj.Visible = False: cmbDopr.Visible = False: cmbMenu.Visible = False Case 1 cmbStav.Visible = False:...

przycisk wyboru i kilka textboxów excel vba - jak można skrócić ten kod

Witam, jak w temacie jak mogę skrócić poniższy kod, z góry dziękuję [syntax=vbscript] Private Sub OptionButton1_Click() Private Sub OptionButton1_Click() For i = 6 To 21 Me.Controls("TextBox" & i).Visible = False Next End Sub Private Sub OptionButton2_Click() For a = 6 To 9 Me.Controls("TextBox" & a).Visible = True For i = 10 To 21 Me.Controls("TextBox"...

Excel - Tworzenie się zakładek arkusza Excel w zależności od zmiennej w dowolnej

Możesz dopasować to: [syntax=vb] Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("A1")) Is Nothing Then Select Case Range("A1").Value Case 1 Worksheets("Arkusz2").Visible = False Worksheets("Arkusz3").Visible = True Case 2 Worksheets("Arkusz3").Visible = False Worksheets("Arkusz2").Visible = True End Select End If...

Access 2007: Jak dodać dynamiczne pola w formularzu z polem kombi?

Zrobiłem żeby pojawiały mi się pola w zalezności jaką wartośc wybiorę w polu kombi ale mam jeszcze jeden problem działa to tylko podczas tworzenia rekordów jeśli cofam sie do poprzedniego aby go podejrzeć widnieją te pola które zostały ostatnio wywołane;/ Private Sub Kombi16_AfterUpdate() If Me.Kombi16 = "Podłogi T5" Then Me.Tekst19.Visible = True Me.Tekst21.Visible...

[delphi] Jak obsłużyć błąd Socket error #10060 w Delphi przy użyciu idHTTP?

Witam Panowie mam taki problem wydaje się, że program działa poprawnie. kod programu procedure TForm1.Button4Click(Sender: TObject); begin form3.Visible:= false; tlo.Visible:= false; plansza2:=StringGrid1.Cells[4,nrid]; begin try form2.o2.Picture.LoadFromFile(plansza2); except form2.Visible:= false; MessageDlg('Błąd wczytania danych.',mtInformation,[mbOk],...

[c++] Rysowanie wykresów w aplikacjach okienkowych

Witam, mam problem. Postanowiłem napisać program okienkowy liczący miejsca przecięcia się 2 prostych przy pomocy wyznaczników macierzy. Wszystko pięknie działa, ale postanowiłem sobie, że fajnie by było jak by jeszcze rysowało te proste. I tu pojawia się następujący problem, bo po 1 nie wiem jak przeliczyć to na układ kartezjański, bo chyba będzie to...

[Excel] Wyskakujące nowe menu - kłopot z wyłączeniem

Excel 2010 i plik z Przykład.rar: A. W narzędziach Głównych nie widać grupy Elektroda z pliku. Jest Schowek - Czcionka - Wyrównanie - Liczba - Style - Komórki - Edytowanie. http://obrazki.elektroda.pl/2898518300_1... B. Jeśli z poziomu tego okna wstawimy nową grupę (tutaj Elektro 2), to jest ona widoczna na karcie Narzędzia Główne. Widać...

c# Łączenie kilku textBox-ów w jedną całość i wysyłka na e-mail

Nie rozumiem o co chodzi, ale może o : [syntax=csharp]textBox3.Visible = false;[/syntax] ?

VBA Excel - drukowanie wielu plików word z poziomu excela

Trochę lekkich poprawek kodu, i rozłożenie na 2 pętle spowodowało że kod działa prawidłowo. W jednej pętli drukowało 1 plik i koniec, nie miałem pomysłu i czasu na dłuższą zabawę z tym kodem dlatego wrzucam w takiej formie w jakiej mi się udało (przetestowane, działa) [syntax=vbscript] Sub drukuj_z_raportem() Dim PPath$, buf$ Dim r As Integer Cells(1,...

C++ Builder - jak stworzyć listę parametrów z ComboBoxem jak w Object Inspector?

Zrobiłbym to inaczej nieco, przedstawię schematycznie na jednej komórce: X Y to nie jest zbyt praktyczne rozwiązanie raczej. Proponuję zrobić tak: Edit i nad nim jest ComboBox Form1 ComboBox1->Visible=false; Edit1 On Click ComboBox1->Visible=true; ComboBox1 On Change ComboBox1->Visible=false; Pozdro chłopaki ;)

[Delphi] Jak poprawić procedurę wyszukiwania w Lazarusie z Firebird?

[syntax=pascal]DBGrid1.Columns[i].Visibl... := False;[/syntax] Niby to miało by być tak ale nie wiem jak zdefiniować zmienną.

Excel - user form - problem z wyłączaniem skoroszytu

Jednak gdy uruchomię jakiegoś innego "excela" - ukryty skoroszyt się pojawia. Stosujesz błędną nomenklaturę i z tego wynikają różne niespodzianki :D Aplikacja Excel jest uruchomiona cały czas (i musi być uruchomiona) wtedy kiedy aktywny jest plik (czy inaczej skoroszyt) z makrem - bez względu na to czy jest on widoczny czy nie :?: :idea: Jeśli operujesz...

Excel VBA - jak użyć Application.Wait do otwierania pliku po jego zamknięciu?

Zajrzałem na forum i widzę że "wisi" temat, więc podaję rozwiązanie które spełniło moje oczekiwania, po prostu: Do Set wb = Application.Workbooks.Open(filename:=pli... With Application .DisplayAlerts = False .Visible = False .ScreenUpdating = False End With Loop Until wb.ReadOnly = False

VB.Net operacje na DataGridView - pobrane z pliku Excela

Filtrowanie w datagridview jest toporne, spróbuj nieco inaczej poprzez iteracje [syntax=vbnet] For i =0 to Dgv.rows.count - 1 Dim wkom as string = Dgv.rows(i). Cells(0).value.tostring.tolower If instr(wkom, textbox1.Text.tolower,text)=0 then Dgv.rows(i). Visible=false Else Dgv.rows(i). Visible=true End if Next [/syntax]

Delphi 6 – dlaczego warunek if w procedurze Button1Click nie działa poprawnie?

Nie używałem tego od lat, ale na pierwszy rzut oka dla mnie ten fragment jest bez sensu: if edit1.Visible= false then edit1.Visible:= true; edit2.Visible:= true; label2.Visible:= true; label3.Visible:= true; label1.Caption :='0' begin else if edit1.Visible:= true else a:=label2.Caption + label3.Caption end; end. Nie wiem dokładnie, o co tu chodzi, ale...

Excel VBA: Jak dynamicznie aktywować plik z nazwy w komórce H26?

Witam. Próbuję użyć odwołania do komórki w innym makro i już mi to nie działa. Próbuję zrobić makro które w tabeli przestawnej,wybierze mi z całej listy tylko jedną datę, data znajduje się w komórce M8. Myślę że to najlepszy sposób. Ale nie działa odwołanie do M8 Sub Makro1() Makro1 Makro With ActiveSheet.PivotTables("Tabela przestawna1").PivotFields(&...

C++ Builder - Jak otworzyć nową ramkę z buttona?

File-> New -> Form Tworzysz nową formatkę i w niej możesz robić co chcesz. Trzeba pamiętać żeby do poszczególnych formatek się odwoływać, czyli na przykład: [syntax=cpp] Form1->Visible=true; Form2->Visible=false; [/syntax]

[c#] - Jak estetycznie rysować linie wygrywające na planszy 15x15 w FlowLayoutPanel?

Dobra może takie coś się uda... Tworzę dodatkowy FlowLayoutPanel o parametrach (lokalizacja, wielkość, marginesy itp) dokładnie takich samych jak ten pierwszy (plansza). Jedyną różnicą jest to, że ma on ustawioną przezroczystość (kolor). Domyślnie ma opcję Visible=False. W momencie gdy mam oznaczyć wygraną robię to, ale na tej dodatkowej planszy. Następnie...

[DELPHI] Jak przeszukać plik tekstowy z internetu bez pobierania?

Witam! Czy da się bezpośrednio przeszukać plik tekstowy (znaleść dany ciąg znaków), który jest w internecie? Chodzi o to, że gdy pobiore tekst do richedit i mam program niewidzialny (visible=false) nie da się go przeszukać.

Makro nie działa po dopisaniu do wydarzenia arkusza

Wyłącz event'y [syntax=vb]Private Sub Worksheet_Activate() Application.EnableEvents = False przeliczAZ Application.EnableEvents = True End Sub[/syntax]Bo jeśli wykonasz [syntax=vb]Sheets("wpłatyH").Visible = False[/syntax]Aktywnym staje się "ZALEGŁOŚCI" i masz pętlę.

Makro Excel nie odświeża tabel przestawnych w zakładce Summary - jak naprawić?

Witam, nie jestem w stanie znaleźć przyczyny nieoczekiwanego działania makra. Plik w załączeniu. W zakładce Summary sa 4 tabele przestawne ciągnące dane z dwóch zakładek i prezentujące dwa pivot itemsy dla każdej z zakładek: Bad goods i alert. Generalnie każda z tabel ma pokazać wszystkie wartości za wyjątkiem kilku, oraz pokazać je po odpowiednim posortowaniu....

[C#] VS'05 Wybudzenie formy/programu z windows taskbar

O coś takiego chodzi? syntax w pierwszym poście.

BCB6 - alternatywne komponenty do wyświetlania danych z bazy jak w Outlook'u

Witam Podepnij do tabeli kontroke DBGrid i zrob visible:=false a z niej pobieraj kolejno dane z poszczegulnych kolumn do memo czy czego tam juz sobie chcesz. Mysle ze tak bedzie najwygodniej. Pozdrawiam

Power Point - jak wstawić przycisk drukuj w prezentacji.

Aby się nie drukował przycisk dodaj taką linię na początku kodu: CommandButton1.Visible = False i na końcu kodu CommandButton1.Visible = True jeśli nie zmieniałeś nazwy przycisku i jest domyślna nazwa -CommandButton1- jeśli zmieniałeś to podstaw odpowiednią nazwę. Co do drukarki domyślnej to da się zrobić ale trzeba zaczekać na bardziej biegłych w tym...

Excel VBA - Jak zapisać stronę HTML do pliku TXT automatycznie?

Sprawdź [syntax=vbscript]Sub elka() s = "http://www.google.com" p = "c:\test.txt" With CreateObject("InternetExplorer.Applicati... .navigate s .Visible = False Do While .readyState <> 4: DoEvents: Loop Open p For Output As #1 Print #1, .document.body.innerText Close #1 .Quit End With MsgBox p End Sub[/syntax]

Kod w Delphi do obsługi terminala RS232 - szukam przykładu

Witam. Ściągnij sobie komponent comport. Na forme wstaw 2 x memo, 1 x edit, 3 x buton i comport. 'button1 do łączenia i rozłączenia 'button2 do wysyłania 'button3 do ustawienia portu 'edit1 do wpisania tekstu jaki chcesz wysłać 'memo1 do odebrania tekstu 'memo2 do "pomocy" ustawione jako niewidoczne 'zdarzenie do ustawienia portu procedure TForm1.Button3Click(Sender:...

[Delphi] jak zabronić wprowadzania liczb ujemnych?

Poprawiłem troche program. Już nie można wpisać ujemnych danych oraz zera. Problem pozostał w momencie obliczania wyniku. Chciałbym żeby w tym miejscu pokazywalo się że podano bledne wartości. Kod źródłowy programu: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,Math; type TForm1...

[C++] - Borland c++ - Świecący przycisk po najechaniu myszką

Witam. Chcę zrobić aplikację, która będzie bazowała na elementach Image (zamiast Button). Planuję pozbyć się "windowsoskich" klawiszy X, minimalizuj i wstawić własne. Przygotowałem 2 grafiki : 1. obraz "X.bmp" 2. obraz "Xhover.bmp" - X po najechaniu na niego myszką Dodatkowo mam 3 elementy Image : 1. image_X - załadowany obraz "X.bmp" 2. image_Xhover...

Makro Excel - omijanie okien dialogowych przy kopiowaniu danych

Na szybko bo lecę spać i nie sprawdzę, może to będzie dobry trop: [syntax=vbnet] Private Sub Workbook_Open() On Error Resume Next Workbooks.Open(Filename:=ThisWorkbook.Pa... & "\TwójPlik.xls", ReadOnly:=True, UpdateLinks:=xlUpdateLinksAlways).Window... = False End Sub Private Sub Workbook_BeforeClose(Cancel As Boolean) On Error Resume Next Workbooks("\TwójPlik.xls").Close...

Sterowanie 8 urządzeniami przez LPT – jak odczytać napięcie z portu równoległego?

hmm mam problem, przy kompilowaniu w Virtual Basic skryptu(pod win XP): Private Sub Command1_Click() PortAddress = (&H378) Out PortAddress, 1 Command2.Visible = True Command1.Visible = False End Sub wyskakuje mi error "sub of function not definied" (przy outport adress) (korzystam z inpout32.dll )

C++ Builder 6, grafika, przeźroczystość - algorytmy.

No, tak, w poprzednim programie komponent był cały czas wyswietlany. hmm, wiec jesli rysował bede na komponencie Image gdzie Visible=false, cały proces bedzie szybszy ? Dodano po 2 Sprawdziłem empirycznie - tak. Cholerka takie przeoczenie i takie straty ;]

Excel/VBA - Combobox sortowanie i autouzupełnianie

Można tak: [syntax=vb]Sub AddItem(ByVal sItem As String, ByRef cmbBox As ComboBox) ' adds item retaining alphabetic order Dim l As Long For l = 0 To cmbBox.ListCount - 1 Select Case StrComp(cmbBox.list(l), sItem, vbTextCompare) Case 0: Exit Sub ' already in the combobox Case 1 cmbBox.AddItem sItem, l Exit Sub End Select Next l cmbBox.AddItem sItem End...

ASP.NET C# - Błąd przy obsłudze dwóch TextBox'ów i przycisków na stronie

Sprawdzałem 14 razy i dopiero teraz jak powiedziałeś ( za 15 razem) sprawdziłem i co się okazuje- w ogóle tego nie było... [syntax=csharp] <asp:TextBox ID="TextBoxADDGear" runat="server" Visible="False" ToolTip="Wprowadź nr skrzyni" Width="96px"> </asp:TextBox> [/syntax] Dodałem więc: [syntax=csharp] ontextchanged="TextBoxADDGear_TextChange...

C# - przełączania pomiędzy form1 i form2 bez zmiany wartości w combobox

Kiedy są wczytywane? Jak ukrywasz - poprzez ustawienie visible na false, czy poprzez destrukcję obiektu formy?

VBA - Różne obszary wydruku PDF na różnych monitorach, różna liczba wierszy

[syntax=vbscript] Sub Zapisz_oferte_do_pdf() Sheets("Oferta").Visible = True zmienna = Range("A7") nazwa = Range("A5") adres = Range("F25") Worksheets("Oferta").Range(zmienna).Rows... = False Sheets("Oferta").ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ adres & nazwa & ".pdf", Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False,...

[Delphi]Odtwarzanie dźwięku po naciśnięciu przycisku.

A co do media playera nie chcem go dawać bo chodzi mi ogolnie o to żeby odtwarzał się dźwięk podczas na naciśnięcia zwykłego Buttona. Nic nie stoi na przeszkodzie, żebyś ukrył MediaPlayer (Visible := false) i korzystał z jego funkcji (Open, Play, Stop...) - co jest opisane w podanym przeze mnie linku.

[Delphi] [Delphi]: Jak wysłać nową linię na rs232 do uC AVR przez ComPORT?

Witam Panów Czytałem całe zagadnienie, mam chyba podobny problem. Napisałem program w VB komunikacja odbywa sie po RS232 do uC Atmega8 Tu natomiast program jest napisany w bascomie. I co sie okazuje Program VB prawidłowo wysyła komunikaty jednak zle one są odbierane przez bascoma?? Co jest nie wiem. Wszystko jest ustawione tak jak powinno przesle do...

[EXEL VBA] Obsługa brakujących danych w tabeli przestawnej

Witam, mam tabele przestawna w VBA która w kolumnach pokazuje mi wybrane wiersze z kategorii "Team" z moich danych. Potrzebuje sposoby na to żeby w momencie kiedy danych z poszczególnej kategorii nie będzie w exelu makro omijało ten pkt. i przechodziło dalej. np. [syntax=vbscript]With PT2.PivotFields("TEAM") .Orientation = xlRowField .PivotItems("1").Visible...

Kalendarz w builder c . Jak usunąć zaznaczenie daty?

Też się na tym kiedyś głowiłem i nie znalazłem własności komponentu CCalendar, która by to niwelowała ten podkreślony prostokąt na polu dat. Z drugiej strony, owe coś można oszukać. Jakby nie patrzyć, to ten CCalendar, to jakaś pochodna obiektu StringGrid, tzn, bardzo podobne właściwości. Więc tak na chłopski rozum wbijamy na formę obok "kalendarza"...

Jak wczytac z pliku txt 2 wiersz i koleje do labla w delphi

Dla początkującego najprostszy jest poniższy sposób (chociaż trochę pamięciożerny) : Do formy wrzucasz sobie komponent memo i czynisz go niewidzialnym (visible:=false jeśli mnie pamięć nie myli). Następnie możesz sobie załadować do tego memo plik (poszukaj w pomocy polecenia LoadFromFile). Do kolejnych linii tekstu możesz się łatwo odwoływać, bo memo...

[vba][excel] - Jak sprawdzić numer indeksu kontrolki na UserForm

Dzięki, jak zwykle jesteś niezawodny. Wykorzystam pierwsze rozwiązanie. Co do indeksów to fakt, jest to trochę denerwujące, że trzeba pamiętać o kolejności umieszczania na formie jeśli się chcę mieć je jakoś uporządkowane. Kiedyś próbowałem znaleźć odpowiedz czy da się zmieniać ideksy po umieszczeniu ich na formie i wyszło mi że nie. A co do odwoływania...

VB2010 - Odczyt danych z portu szeregowego za pomocą mscomm

Witaj ponownie. Niestety nie radze sobie z tym, okazuje się ze jestem zielony. Otwieranie i zamykanie portu nie ma z tym problemu ale dalej stoję w kropce z odbieraniem znaków. Wysyłam około co 1 sekundę po kilka znaków liczby i słowa. Na terminalu nie ma problemu. To kod który zmąciłem ale dalej dobrze nie rozumiem [syntax=vbnet]Public Class Form1...

[Delphi] Jak stworzyć program do zarządzania i uruchamiania plików z list?

Jeśli jest multi select, to należy skorzystać z innej właściwości - Files, bo Filename przechowuje tylko nazwę jednego pliku, stąd też tylko jeden się dodawał. Można to zrobić w pętli i dodawać kolejne pliki. W przykładzie poniższym nie ma ścieżek, co jak pisałem wcześniej będzie problemem przy otwarciu pliku (jeśli nastąpi zmiana katalogu przy Open...

Visual C# 2008 Express – jak dynamicznie dodać przycisk podczas działania programu?

U mnie ten kod działa, przycisk znika. Porównaj ze swoim. using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Linq; using System.Text; using System.Windows.Forms; namespace WindowsFormsApplication1 { public partial class Form1 : Form { public Form1()...

Jak połączyć własne klasy z TForm w Borland C++ Builder?

pan_kotek, a co tu może nie działać? :P Możesz mieć kolor zły ustawiony w Image1->Canvas, Możesz mieć Image1->Visible = false zamiast true i parę innych rzeczy. Umieść tutaj źródło, bo twój problem jak tak banalny, że chyba nikt ci nie powie bez kodu, bo wiara nie sięga tak daleko :P A tak na poważnie to dajcie kody źródłowe prostych programów. Przecież...

Jak stworzyć ruchomy obrazek w Delphi bez użycia Fly?

Zrobiłam coś takiego, że jak odległość środków dwóch obrazków przemieszczających się po formatce będzie mniejsza niż wysokość czy szerokość jednego z nich to ten drugi staje się niewidzialny. Poniżej jest fragment kodu... Jeszcze mam pytanie czy można jakoś inaczej zapisać w Delpi długość, szerokość i widzialność obiektów ? Bo mi wskazuje błąd na "Width",...

[C++ builder 5] Ukrywanie Frame (funkcja Visible) błędy ??

Witam Pisze program w c++ builderze 5 i napotkałem na dziwny problem :( Gdy chcę ukryć ramkę którą dodałem do projektu to kompilator wywala błędy :( oto kawałek kodu .... Frame1 -> Visible=false; .... gdy kompiluje program to pojawia się coś takiego " Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address...

[C#] Jak dynamicznie dodawać textboxy po wpisaniu tekstu do poprzedniego?

Na etapie tworzenia pododawaj wszystkie formatki, ale tym ukrytym poustawiaj atrybut visible na false. Dla widocznego textboxa ustaw akcję np. onChange, a w jej treści zmieniaj ukrytym textboxom, które chcesz pokazać, visible na true.

Access - jak usunąć puste miejsca w raporcie z pól wyboru?

Nie mam Accessa pod ręką, ale najprościej: Ustaw istniejące pola tekstowe na Visible=False (i przesuń w kąt) Wstaw nowe pole tekstowe i testując zawartość "oryginalnych", połącz teksty na zasadzie iif([Pole1]="";&qu... & Chr(10)) & iif([Pole2]="";&qu...

VBA: Wyświetlanie obrazów w etykiecie UserForm po zaznaczeniu checkboxów

Witam, potrzebuję pomocy, jak mógłbym napisać w VBA, żeby pojawiały się obiekty (1, 2, 3, ..., 11) w etykiecie1. Ma to działać w taki sposób, że po kliknięciu w checkbox1, który znajduje się na UserForm1 pojawia się obraz1 w etykiecie1 wyśrodkowane. Tak samo z następnymi aż do 11. Chodzi mi też o to, że jak zazanaczę checkbox1 i checkbox8, to wtedy...

Excel - jak zablokować dodawanie i edytowanie nazw arkuszy?

Poza tym arkusz (sheets) nie ma w visible "opcji" True. Oczywiście ma :) Właściwość Visible obiektu może przyjąć wartość True, False. Tu raczej podejrzewam błąd w nazwie (1004), lub włączoną ochronę skoroszytu (struktura). Spróbuj marcinj12 . Wstawianie nowego: Można wykorzystać zdarzenie 'Private Sub Workbook_NewSheet(ByVal Sh As Object)'. Wyłączyć...

Jak zwiększać wynik o wartość po wciśnięciu Q lub W w Visual Basic 6?

Dla tych co jeszcze wiedza mniej niż ja, podaje kod:) Licznik sumuje moje punkty jupi! Private x As Long Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyQ Then x = x + 10 Label2.Visible = False End If If KeyCode = vbKeyW Then x = x + 100 End If Label1 = x End Sub Dziekuje za podpowiedzi No i żadnej pętli nie trzeba

VBA - Przycisk, który wyświetla (nie wstawia) zdjęcie.

Myślałem, że przyciski na formie, a nie w arkuszu. [syntax=vb]With Sheets(1) For Each sh In .Shapes If sh.Name Like "obraz*" Then sh.Visible = False Next .Shapes("obraz1").Visible = True End With [/syntax]

VBA Excel - Dlaczego funkcja do odkrywania arkuszy nie działa?

I teraz jest wszystko jasne :) Stworzyłem makro, dla którego na sztywno wpisałem zakres komórek, w których będą nazwy arkuszy do ukrycia/odkrycia. [syntax=vb]Sub Pokaz() For Each ark In ThisWorkbook.Sheets(1).Range("A1:A2") For Each sh In ThisWorkbook.Sheets If sh.Name = ark.Value Then Worksheets(ark.Value).Visible = True Exit For End If Next sh Next...

Jak opóźnić autostart programu bRemote po starcie Windows XP?

No niestety, ale to prościutkie będzie i tak byś musiał wpisać ścieżkę itd. więc do dzieła, myśle że delphi masz (a jak nie do pobierz trial i już): 1. uruchamiasz delphi (tworzy się nowy projekt) 2. we właściwościach formularza "on show" wpisujesz to: Form1.Visible := False; //ukrywamy formularz sleep(5000); //czekamy 5 sekund ShellExecute(0,'open','c:\sciezk...

EXCEL - Pobieranie danych z pliku TXT w tym samym katalogu.

Witam! Chyba zacząłem łapać bo to zaczyna działać i VBS już robi wszystko sam :) Teraz (w związku z tym) szukam: - Ignorowanie ERRORA (np nie znalazł pliku do załadunku) - by pytał o położenie pliku z którego ma zaczytać dane - jak sprawić by czytał z ukrytego arkusza? obecnie w VBS mam zwyczajnie Sheets("nazwa_arkusza").Visible = False /True które...

Jak wyświetlić tylko bieżący dzień na niebiesko w kalendarzu VBA?

Zdaje się (mój) błąd w pętli (cmbMiesiac_Change) Spróbuj [syntax=vb]For iLicz = 0 To 36 With Me.Controls(iLicz) .BackColor = &H8000000F .ControlTipText = "" .SpecialEffect = 0 If iLicz >= iStart And iLicz < iKoniec Then .Caption = iLiczDni If Day(Date) = iLiczDni And Month(Date) = iMiesiac Then Me.Controls(iLicz).BackColor = RGB(0, 255, 255)...

VBA excel Pojawiający się i znikający CommandButton

Z góry uprzedzam że jestem kompletnym laikiem w VBA – brakuje mi podstaw. W pracy miałam do czynienie z arkuszem obliczeniowym napisanym x lat temu w VBA w excelu który musiałam przystosować do zmieniających się przepisów i norm. Sprawiło mi to wiele frajdy, ale było to – najpierw delikatne grzebanie w cudzym kodzie, później pisanie na tej...

[VBA] Jak zadeklarować zmienną jako dokument Word o nazwie Harmonogram.docx?

Witam. Utworzyłem poniższe makro. Jego zadanie polega na otwarciu pliku Word (korespondencja seryjna) z hiperłącza, oraz przekopiowaniu z excela tabeli do worda w określone miejsce pliku worda. Makro nie jest doskonałe, ponieważ zadeklarowałem zmienna "Plik" jako aktywny plik worda, w momencie kiedy word nie jest aktywny wyrzuca błąd i się zatrzymuję....

VBA Excel - Filtrowanie danych w tablei przestawnej

Przetestuj poniższy kod [syntax=vb]Sub PVFIELDS() Dim oPvtItem As PivotItems Dim iFltr As Integer iFltr = Cells(1, 1).Value Set oPvtItem = ActiveSheet.PivotTables("Tabela przestawna1").PivotFields("Okres").Pivot... For Each pvt In oPvtItem For i = 1 To iFltr If pvt.Name = CStr(i) Then pvt.Visible = True Exit For Else pvt.Visible = False End If Next...

[Delphi] TrayIcon: PopUpMenu nie działa za pierwszym razem, gdy Form1 widoczny

Przeszukałem kilka forum jakie znam, ale na mój problem nie znalazłem wyjaśnienia :( Od razu zakładam żeby przeczytać cały post, bo możecie mnie nie zrozumieć :( Mam problem z TrayIcon, chodzi dokładnie oto, aby po uruchomieniu projektu od razu pokazało się okno Form1 i TrayIcon, gdy kliknę prawym przyciskiem myszki na Trayicon to żeby pokazało się...

Access - podformularz zewnętrzny i aktywowanie obiektów

Ad.1 Minimize i Restore zrealizujesz przy zdarzeniu formularza Form_Activate i Form_Deactivate. Osobiście wolę ukryć nieaktywny formularz Private Sub Form_Open(Cancel As Integer) Forms![Main].Visible=False End Sub Private Sub Form_Close() Forms![Main].Visible=True End Sub Ad.2 Nie znam sposobu na wydrukowanie pojedynczego...

Jak ukryć hasło w InputBox w Visual Basic?

Witam. Ja to robiłem w ten sposób: Dim aaa As string Dim bbb As String Private Sub Command1_Click() If Text1.Text = "" or Text2.Text = "" Then Exit Sub aaa = Text1.Text bbb = Text2.text Frame1.Visible = False Frame2.Visible = True End Sub Private Sub Command2_Click() If Text3.Text = aaa and Text4.text = bbb Then MsgBox...

Delphi7 - BitButtony znikają na Windows 98 po przejściu formularzy, jak zwolnić pamięć?

Napisalem pewien program. Składa sie on z około 40 formularzy. Pod XP wszystko działa super, natomiast pod 98 znikaja mi BitButtony. TZN POdczas exploracji programu obsługujący przechodzi z jednego formularza na drugi (forrm1.visible:=false; form2.visible:=true;) itp Program ma strukture drzewa po której mozna swobodnie chodzić. Po przejściu gdzieś...

[c++ builder] Jak wywołać funkcję onclick w C++ Builder przy form->Create lub form->Show?

Ok, o to chodziło, ale mam jeszcze jedno pytanie. Co zrobić, aby narysowany wielokąt był nad TImage umieszczonym na tej Formie, lub tak, aby obrazek był tłem wielokąta, zamiast koloru? Teraz mam go pod obrazkiem:/ Wstawianie TImage zdecydowanie mija się z celem skoro działasz na Canvasie, ponieważ równie dobrze możesz rysować obrazek. Sprawdź funckję...

VBA Excel - Makro do kopiowania arkuszy z wielu plików bez otwierania

Chciałbym aby makro działało w tle Ukryta instancja? Będzie "prawie" w tle. Zgadzam się z przedmówcą. Musisz pliki otwierać, ale nie musi to być widoczne.[syntax=vb]Dim myPath As String, myFile As String, myPass As String Dim oExcel As Excel.Application On Error GoTo qInst Set oExcel = CreateObject("Excel.Application") 'domyślnie Visible=False 'pocz...

Czy jest jakis wzór aby obliczyc czas ładowania akumulatork.

Marbed - masz mały problem. Nie napisałeś jaki masz aparat, ale cię muszę zmartwić, że niestety skazany jesteś na baterie. Aparat mierzy napięcie i wyłacza się kiedy jest zbyt niskie. A cały "myk" polega na tym, że bateria ma 1,5V a akumulator 1,2V :cry: Problem to mam sporawy :cry: Mój aparat to Kodak C330. I wygląda na to, że możesz miec rację z...

Aktualizacja danych w pliku xls przez skrypt VB w Accessie - błąd UpdateLinks

Hej, Nie mogę sobie poradzić z aktualizacją danych w pliku xls spod skryptu VB w accessie. Zapis „UpdateLinks = xlUpdateLinksAlways” zawiera błąd Próbowałam: „UpdateLinks: = xlUpdateLinksAlways” - zupełna klapa. Chciałam pokazać wiersz, który ma być aktualizowany: „UpdateLinks = 3” Też źle Poniżej podaję część skryptu,...

VBA Excel - błąd Metoda pastespecial klasy range przy pierwszym uruchomieniu

Witam, po uruchomieniu poniższego kodu, występuje błąd Metoda pastespecial klasy range nie powiodła się (na etapie pierwszego wklejania). Gdy puszcze drugi raz makro, błąd nie występuje. O co chodzi? ActiveSheet.Name = "dfe.xlsm" Range("b16:b28").Select Selection.Copy Windows("abc.xlsm").Activate Worksheets("1").Activate ActiveSheet.Unprotect Password:="xxx"...

Delphi: Jak przypisać TMainMenu do obliczania pól różnych figur?

unit Figury_geometryczne; {$mode objfpc}{$H+} interface uses Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs, Menus, ExtCtrls, StdCtrls; type { TForm1 } TForm1 = class(TForm) Oblicz_Pole: TButton; Oblicz_obwod: TButton; ColorDialog1: TColorDialog; Edit1: TEdit; Edit2:...

C# - Dlaczego metody dodaj() i test2() nie działają po kliknięciu buttona?

Może źle podchodzę do tego. Chodzi mi o to, że mam jakieś menu z buttonami. Klikając na button ma pokazywać się panel (kontrolka Panel). Stworzyłem klasę i w niej chciałem stworzyć metody, takiej jak pokaż, ukryj, dodaj panel. [syntax=csharp] public class klasa { public static void dodaj1() { Panel dodajpanel1 = new Panel(); dodajpanel1.visible = true;...

Vb - Obliczanie pól powierzchni w visualu basicu ?

MOzesz tez obsluzyc do tego zdazenie keypress i sprawdzac na biezaco co leci z klaw i jak cos bedzie co cie nie interesuje to pomijasz A co do tych obrazkow to kordian11 chodzi poprostu o to by obrazki byly caly czas z tym tylko ze przy pomocy radiobutona bedziesz uwidacznial tego odpowiadajacego radiobutonowi a wszystki inne lub poprzednio aktywny...

[Access] Jak odfiltrować formularz po wyborze nazwiska z Kontakty?

Problem rozwiązany, zamiast filtrować formularze aby drukować tylko ten wybrany, utworzyłem nowe okna tekstowe pobierające wartość z okienek prezentujących dane z wybranych rekordów. Nieco skomplikowane - poniżej kod VBA dla przycisku drukowania: Private Sub Polecenie24_Click() Dim Tekst As String Tekst = Tekst1787.Value Tekst1787.Visible = False Tekst1792.Value...

Jak rysować wykresy w Visual Studio 2010 przy użyciu VB?

co dostajesz na porcie ?? tzn co to za sterownik albo czujnik albo w ogóle co to jest ?? tak jak ci napisałem ... [syntax=vb] Imports System.Collections.ObjectModel Imports Microsoft.VisualBasic.FileIO Imports System.Windows.Forms.DataVisualization.C... Imports System.IO Imports System.IO.Ports.SerialData Imports System.Text Imports System.IO.Ports...

Czy ten kabelek usb/av można zrobić ze zwykłego kabla USB...

Witam, Mam pytanie: Czy ten kabelek usb/av (do kodaka) http://www.kodak.com/eknec/PageQuerier.j... można zrobić poprzez "dolutowanie chinchów" do odpowiednich pinów męskiego wtyku usb standardowego kabla pc-aparat - http://www.kodak.com/eknec/PageQuerier.j...