Hirdetés
- Luck Dragon: Asszociációs játék. :)
- gban: Ingyen kellene, de tegnapra
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
- GoodSpeed: Ágymatrac keresési kálvária
- eBay-es kütyük kis pénzért
- sziku69: Fűzzük össze a szavakat :)
- Meggyi001: Kórházi ellátás: kuka vagy finom?
- sh4d0w: StarWars: Felismerés
- sziku69: Szólánc.
- WireGuard VPN a mindennapokra
Új hozzászólás Aktív témák
-
Lokids
addikt
-
Pali79
aktív tag
válasz
Petya25
#2797
üzenetére
Így sem jó valami:
Error 1 Operator '*' is not defined for types 'System.Windows.Forms.TextBox' and 'System.Windows.Forms.TextBox'.Ez lenne a kód:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click
TextBox2 = TextBox1 * TextBox1
End Sub -
Delila_1
veterán
válasz
Petya25
#2778
üzenetére
A képeken láthatod, hogy az adatokat tartománnyá alakítottam, majd az A2:B10-nek nevet adtam. Ez lett a ComBobox RowSource bemenő tartománya (Munka1!ID_Nev)
A ComboBox ColumnCount értéke 2, ezért látszik mindkét oszlop. Az egyik nevet (Anna) szándékosan 2 ID-hez rendeltem.
A név kiválasztásakor a lenti makró beviszi a kívánt értékeket a 2 labelbe.
Private Sub ComboBox1_Change()
Dim sor As Integer
With Sheets(1)
sor = Application.Match(ComboBox1, .Columns(1), 0)
Varos = .Cells(sor, 3)
Fogl = .Cells(sor, 4)
End With
End Sub
Azt még most sem értem, miért egy diagramról akarsz értékeket bevinni a formra, miért nem abból a tartományból, amiből létrehoztad a diagramot.
-
Delila_1
veterán
válasz
Petya25
#2776
üzenetére
1. A grafikonos kérdést nem értem.
2. Teszel a formra egy textboxot, ahol megadod a rekord sorszámát. Mivel az itt megadott érték szöveg típusú (ezért hívják textboxnak), át kell alakítanod számmá – pl. hozzáadsz 0-t, vagy szorzod 1-gyel. Ezután már beírhatod a form objektumaiba a cells(sorszám, oszlop) értékeket.
-
vilag
tag
válasz
Petya25
#2283
üzenetére
Ahogy írtam VBA-ban szeretném ezt a problémát megoldani, így sajnos az általad kínált megoldás nem használható.
A VBA súgójában annyit találtam, hogy "ActiveWorkbook.ReadOnly" az csak lekérdezhető.
A probléma az, hogy az adot fájlt tööben is használják a hálózaton, viszont a felhasználók egy körének csak olvasásra szabadna megnyitnia.
Fájlszinten a biztonsági beállítások között szépen be is állítottam, hogy mely felhasználók nyithatják írásra, és melyek szerkesztésre.
A fájl elsődleges használója azonban nem én vagyok. Hiába állítottam be mint tulajdonos, hogy semelyik más felhasználónak nem engedélyezem, hogy saját tulajdonba vegye a fájlt, ez valamiért időnként mégis előfordul és ilyenkor minden beállított fájlszintű korlátozás ment a levesbe.Ezért akartam ezt programkódból megoldani, ha lehet.
Új hozzászólás Aktív témák
- iKing - Samsung Galaxy A56 5G 5G sebesség, nagy kijelző, stabil üzemidő 8/256 GB
- Asus TUF A15 FA507NUR 15.6" FHD IPS Ryzen 7 7435HS RTX 4050 16GB 512GB NVMe magyar vbill gar
- iKing - Xiaomi 14T Pro Titan Gray Vékony, prémium kivitel, nagy kijelző 12/512
- Samsung NX300 MILC + 18-50mm + 50-200mm
- Apple Macbook Air 13,6 M4 10C CPU/16GB/256GB - Égkék - HUN - 55 Ciklus - 100% akku , 2,5 év gari
- Samsung Galaxy S21 5G 128GB, Kártyafüggetlen, 1 Év Garanciával
- Kèszleten levő VGA-k! Kamatmentes rèszletre is! Èrdeklődj!
- GYÖNYÖRŰ iPhone 13 mini 128GB Green -1 ÉV GARANCIA - Kártyafüggetlen, MS3837, 100% Akkumulátor
- Samsung Galaxy A32 5G 128GB, Kártyafüggetlen, 1 Év Garanciával
- Gamer PC-Számítógép! Csere-Beszámítás! I5 14400F / RTX 3060Ti / 32GB DDR5 / 512GB SSD!
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest