Új hozzászólás Aktív témák

• #2361 Syntax csendes tag belaur #2359

  Új Válasz 2014-02-12 22:07:39 #2361

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Syntax

  csendes tag

  válasz belaur #2359 üzenetére

  Hali

  Makroval oldjad meg, hogy csak a kód megadása után UnHide-olja a Sheet-eket.
  Azt hogy ezt egy form-on, vagy egy cellában teszed azt már a te döntésed.
  

• #2350 Syntax csendes tag vilag #2348

  Új Válasz 2014-01-17 20:51:26 #2350

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Syntax

  csendes tag

  válasz vilag #2348 üzenetére

  oldprinter = Application.ActivePrinter

  ezzel betudod olvastatni az aktuális nyomtatót.
  A nyomtató azonosítójából pedig látod mi a hálózati. (jobb esetben)

• #2315 Syntax csendes tag martonx #2314

  Új Válasz 2013-12-29 15:44:06 #2315

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Syntax

  csendes tag

  válasz martonx #2314 üzenetére

  Szegény ember kézzel nőz...
  (Ha csak ez van akkor ezt kell szeretni, én is szeretnék repülővel járni, de sajnos pont nincs repülőm...)
  Az oktatási rendszerünk hibáinak ez csak a csúcsa. "Akit érdekel a dolog az jobban utána néz", a lehetőséget megadja az iskola, jelige alatt futunk . A munkahelyek meg olyanok mint akármelyik profitorientált szervezet, mindent a lehető legolcsóbban akarnak megoldani, így érthető az excel mánia is.

• #2312 Syntax csendes tag martonx #2311

  Új Válasz 2013-12-27 19:40:23 #2312

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Syntax

  csendes tag

  válasz martonx #2311 üzenetére

  Szegény ember kézzel nőz...
  Amúgy meg ha ez a vizsga feladat akkor ez a feladat.
  A feladat ugyan nem tipikus excel feladat, de ha valaki erre rájön, és veszi a fáradtságot, hogy megcsinálja akkor azzal sokat nyer. Hiszen rájön, hogy mi minden lehet excel-ben csinálni. Illetve más specifikusabb feladathoz sokkal több magyarázat kell illetve esetleges forrásadatok amivel lehet dolgozni. Amíg a sakkot mindenki ismeri, így 1 mondatban ki lehet adni a feladatot. Igazi egyszerű szivatos feladat

• #2310 Syntax csendes tag Syntax #2309

  Új Válasz 2013-12-27 12:35:11 #2310

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Syntax

  csendes tag

  válasz Syntax #2309 üzenetére

  Bocs a helyes kód:

  ActiveSheet.Shapes.Range(Array("gyalog")).Select
  Selection.Cut
  Range("H1").Select
  ActiveSheet.Paste

• #2309 Syntax csendes tag martonx #2308

  Új Válasz 2013-12-27 12:27:49 #2309

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Syntax

  csendes tag

  válasz martonx #2308 üzenetére

  Hali

  Meg lehet oldani.

  ActiveSheet.PasteSpecial Format:="gyalog (Enhanced Metafile)", Link:=False, DisplayAsIcon:=False
  
  ActiveSheet.Shapes.Range(Array("gyalog")).Select
  Selection.Cut
  Range("K4").Paste

  Az első sor arra szolgál, hogy egy képet úgy lehet vele beszúrni, hogy azt később az excel tudja kezelni.
  Manuálisan úgy néz ki, hogy a kiválasztott képet be kell szúrni az excel táblába de amikor beszúrod akkor az egér jobb gombját használva paste special mód kiválasztásával, és a "Picture (enhanced metafile)".

  Miután ez megvan akkor a képet át lehet nevezni, hogy később tudjad, hogy melyik figuráról van szó. Ezt a tábla bal felső sarkában tudod megtenni. (közvetlenül a gombsor és az oszlop címek közt)

  Ha ez megvan akkor már csak az a dolgod, hogy simán csak másolgatod tovább a képet. Az az előbb leírt kód utolsó 3 sora.

  Igyekeztem érthető lenni, ha nem voltam az szólj, és megpróbálom másképp.

  Üdv

• #2305 Syntax csendes tag martonx #2304

  Új Válasz 2013-12-25 12:08:19 #2305

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Syntax

  csendes tag

  válasz martonx #2304 üzenetére

  De mindegy, csak akkor annyiban egyszerűbb, hogy a bábuk vezérlése, nem manuálisan történik, és a kívánt lépést még a végrehajtás előtt lehet ellenőrizni. (Kicsit egyszerűbb, a kivitelezés)

• #2303 Syntax csendes tag luzer0901 #2301

  Új Válasz 2013-12-25 00:21:49 #2303

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Syntax

  csendes tag

  válasz luzer0901 #2301 üzenetére

  Hogyan akarjuk vezérelni a bábukat?
  Egy form-on megadjuk a bábút és a célmezőt?
  Ha így akkor az sokban egyszerűsítené a dolgot.
  Mik a kikötések?

  Az ünnepek vége felé talán tudok segíteni.

• #2289 Syntax csendes tag olli #2288

  Új Válasz 2013-12-21 23:49:42 #2289

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Syntax

  csendes tag

  válasz olli #2288 üzenetére

  Passz

• #2287 Syntax csendes tag vilag #2282

  Új Válasz 2013-12-20 20:39:28 #2287

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Syntax

  csendes tag

  válasz vilag #2282 üzenetére

  Hali

  Illetve ha magát azt a file-t akarod csak olvasásra megnyitni amit indítasz akkor a ThisWorkook -ba a kövi megy bele.

  Private Sub Workbook_Open()
  ActiveWorkbook.ReadOnlyRecommended = True
  End Sub

• #2286 Syntax csendes tag vilag #2285

  Új Válasz 2013-12-20 20:10:49 #2286

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Syntax

  csendes tag

  válasz vilag #2285 üzenetére

  Hali talán erre gondoltál...

  Workbooks.Open Filename:="ide adod meg a file nevet", ReadOnly:=True

• #990 Syntax csendes tag Syntax #989

  Új Válasz 2008-07-22 21:15:56 #990

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Syntax

  csendes tag

  válasz Syntax #989 üzenetére

  Köszönöm de már sikerült megoldani. Minden esetre a későbbiekben tuti visszatérek

• #989 Syntax csendes tag

  Új Válasz 2008-07-22 11:57:29 #989

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Syntax

  csendes tag

  Sziasztok

  (excel VBA makro)

  A következővel kapcsolatban lenne egy olyan kérdésem hogy miért van az hogy csak az első cellát érzi úgy mintha ki lenne a töltve a többit pedig autó matikusan üresnek vesz hiába van kitöltve.

  (egyébként nem csinálna mást minthogy a "H" oszlop 2. sorától kezdődően a kitöltött cellák mennyiségének megfelelő új lapot hoz létre és elnevezi azokat aszerint ami az adott cellába van érték. [sor,"H"])

  Dim sor As Integer
  Dim QH_part As Variant

  sor = 2
  Do While Worksheets("Open").Cells(sor, "h").Value <> ""
  QH_part = Cells(sor, "H")
  Sheets.Add
  ActiveSheet.Name = QH_part
  sor = sor + 1
  Loop

Új hozzászólás Aktív témák