Hirdetés
- M.2 csatlakozók terén (is) jónak ígérkezik az MSI közelgő AMD-s alaplapja
- Kivégezheti a kisebb VGA-gyártókat az NVIDIA döntése
- Szinte a semmiből robbanna be az 1,4 nm-es eljárásával a Rapidus
- Félszáz terabájtos HDD-k előtt nyitotta ki az ajtót a Seagate
- Lassú lett a Windowsod? Ezeket kapcsold ki elsőnek!
- NVIDIA GeForce RTX 5080 / 5090 (GB203 / 202)
- Kivégezheti a kisebb VGA-gyártókat az NVIDIA döntése
- Projektor topic
- E-book olvasók
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Milyen TV-t vegyek?
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- Soundbar, soundplate, hangprojektor
- Kormányok / autós szimulátorok topikja
- Házimozi belépő szinten
Új hozzászólás Aktív témák
-
matekmatika
tag
válasz
matekmatika
#961
üzenetére
Megtaláltam
-
matekmatika
tag
VB6 egy változó tartalmát hogy tudom közvetlenül vágólapra tenni?
-
matekmatika
tag
Megtaláltam.
-
matekmatika
tag
válasz
matekmatika
#712
üzenetére
De hye vagyok textbox-ot akartam írni, Textboxba, hogy lehet szöveget tördelve bevinni?
Köszi -
matekmatika
tag
Sziasztok!
VB6- ban List.Box-ba bevitt szöveget hogyan tudom tördelni?
A ''vbCrLf'' nem működik itt.
-
matekmatika
tag
válasz
[HUN]Zolee
#442
üzenetére
Teljesen mindegy neki a deklaráció, vele és nélküle sem működik.
Excelben egy beviteli mezőbe beírt értéket kellene megvizsgálnom, hogy az numerikus érték vagy nem. A vizsgálat egy parancsgomb megnyomására indulna, ez alá írom...írnám a kódot. Hogyan hívjam akkor meg a függvényt, hogy megegye? -
matekmatika
tag
válasz
Jester01
#437
üzenetére
Az IsNumber-t ötletét a makrorögzítő adta, nekem fogalmam sem volt, hogy van ilyen (nekem magyar Office lévén SZÁM szerepelt a munkalap függvényében) Ergo: olyan nagyon rosszat nem írhattam. Az IsNumeric-et már a neten találtam, több helyen is, több példát, de nem jók. (Lehet Visual Basic.Net kell hozzá?
) Nem tudom. -
matekmatika
tag
Hogyan tudom megvizsgálni a változóba írt éték az szám-e, azaz numerikus-e. Nem kérdeznék ilyen egyszerűnek tűnő dolgot, de már két napja kínlódok vele. Egy csomó példát találtam a neten, próbálgattam, de egyik sem működik. Makrorögzítővel ha készítek egy egyszerű példát:
Sub Rögzítés1()
'
' Rögzítés1 Makro
' Rögzítette: karbantartás, dátum: 2006.05.12.
'
' Billentyűparancs: Ctrl+m
'
Range(''C8'').Select
ActiveCell.FormulaR1C1 = ''=ISNUMBER(12)''
End Sub
Ez még a Ctrl+m-mel működik is.Sőt parancsgomb alá berakva is.
Private Sub CommandButton1_Click()
Range(''C8'').Select
ActiveCell.FormulaR1C1 = ''=ISNUMBER(12)''
End Sub
De amint elkezdem átalakítani az igényeimnek megfelelően, már kiakad.
Private Sub CommandButton1_Click()
szam = InputBox(''Add meg a számot'', ''Szám megadása'', '''', 5000, 1000)
If IsNumber(szam) Then
MsgBox (''ez egy szám'')
Else
MsgBox (''ez nem szám'')
End If
End Sub
Üzenet: Compile error:Sub or Function not defined
Nem értem mi lehet a hiba, próbélkoztam hasonlóan az IsNumeric függvénnyel is, de ugyanez. Segítsetek légyszíves, köszi. -
matekmatika
tag
válasz
matekmatika
#429
üzenetére
Hát így kénytelen leszek én kitalálni
.
Na jó:
Private Sub CommandButton1_Click()
'megnyitandó fájl elérési útvonala a CD-n
mappanev = ''mappa1\mappa2\''
'megnyitandó fájl neve
fajlnev = ''akarmi.xls''
utvonal = ActiveWorkbook.Path
utvonal = Mid(utvonal, 1, 3)
megnyit = utvonal & mappanev & fajlnev
Workbooks.Open (megnyit)
End Sub
Így akkor is jó, ha nem ugyanabban a mappában van a két munkafüzet.
[Szerkesztve] -
matekmatika
tag
válasz
matekmatika
#425
üzenetére
Na jó, egy kis segítség
, mivel az a munkafüzet is a CD-n van ugyanabban a mappában ezért úgy is megoldható lenne, ha valahogy valamivel kideríteném az aktív munkafüzet elérési útvonalát, hiszen ez ugyanaz mint a megnyitásra váróé, csak a fájl neve más. -
matekmatika
tag
válasz
matekmatika
#425
üzenetére
bővebben?

-
matekmatika
tag
válasz
matekmatika
#425
üzenetére
valaki?
-
matekmatika
tag
Lehet hüleséget kérdezek most, de VB-ben van relatív hivatkozás? Konkrétabban, egy CD-re felrakom a dolgokat és az erről megnyitott munkafüzet egy másik munkafüzetből olvasna be adatokat. A gond az, hogy az optikai meghajtó betűjele gépenként változhat, vagyis nem adhatom meg neki, hogy nyissa meg a D:\akármi.xls-t mert nem biztos hogy D lesz betűjele a meghajtónak.
-
matekmatika
tag
Sziasztok! Egy Excel táblázaton dolgozok, végül is speciális leltár-nyilvántartó valamicsoda lenne. Több munkalap, hivatkozások egyikről a másikra. A következőt szeretném. Adva lenne egy beviteli mező amelybe be kell adni a változtani kívánt értéket, és mellette egy másik beviteli mező, ahová az kerülne, hogy milyen értékre szeretném változtani.(nem feltétlenül csak számérték, hanem esetenként szöveg is). Majd (mondjuk egy parancsgomb megnyomásának segítségével) egy adott munkalap adott tartományán lefuttatna egy vizsgálatot és ahol előfordul a változtatni kívánt érték, ott azt lecserélné a kívánt értékre. Segítsetek legyetek szívesek, hogyan tudnám ezt elkészíeni. Köszi!

[Szerkesztve]
Új hozzászólás Aktív témák
- Telekom otthoni szolgáltatások (TV, internet, telefon)
- One mobilszolgáltatások
- GoodSpeed: Márkaváltás sok-sok év után
- Project Motor Racing-Straight4 Studios
- NVIDIA GeForce RTX 5080 / 5090 (GB203 / 202)
- Kivégezheti a kisebb VGA-gyártókat az NVIDIA döntése
- Arc Raiders
- Xiaomi 15 Ultra - kamera, telefon
- Robotporszívók
- Elektromos autók - motorok
- További aktív témák...
- AJAZZ AK820 PRO Billentyűzet
- MacSzerez.com - 2017 MacBook Air 13" / i5 1.8GHz / 8GB RAM / Választható SSD méret! / Garancia!
- MacSzerez.com / iPad Air M2 11" / 6. generáció / Wifi / 128GB / Asztro / Garancia!
- Victus fb3804no 15.6" FHD IPS Ryzen 5 8645HS RTX 4050 16GB 512GB NVMe gar
- MacSzerez.com - 2020 MacBook Air 13" Retina M1 / 16GB RAM / 256GB SSD / Asztroszürke / Garancia
- HIBÁTLAN iPhone 12 Mini 64GB White -1 ÉV GARANCIA - Kártyafüggetlen, MS3644, 100% Akksi
- BESZÁMÍTÁS! MSI B450M R5 5600X 32GB DDR4 512GB SSD RX 6800 16GB Zalman Z1 PLUS Cooler Master 750W
- Samsung Galaxy A33 5G 128GB, Kártyafüggetlen, 1 Év Garanciával
- Xiaomi Redmi 14C / 4/128GB / Kártyafüggetlen / 12Hó Garancia
- Fém, összecsukható és kihúzható fotó állvány eladó
Állásajánlatok
Cég: BroadBit Hungary Kft.
Város: Budakeszi
Cég: ATW Internet Kft.
Város: Budapest



, mivel az a munkafüzet is a CD-n van ugyanabban a mappában ezért úgy is megoldható lenne, ha valahogy valamivel kideríteném az aktív munkafüzet elérési útvonalát, hiszen ez ugyanaz mint a megnyitásra váróé, csak a fájl neve más.



