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

• #23817 Delila_1 veterán Xterms #23816

  Új Válasz 2014-10-20 07:35:59 #23817

  Ú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

  

  Delila_1

  veterán

  válasz Xterms #23816 üzenetére

  Szívesen.

  Remélem, át tudod írni a makró hivatkozásait, ha ez csak egy minta.

• #23815 Delila_1 veterán Xterms #23808

  Új Válasz 2014-10-19 16:08:57 #23815

  Ú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

  

  Delila_1

  veterán

  válasz Xterms #23808 üzenetére

  _1-es verzió

  Az előző verziódhoz képest az oszlopok számán kívül a két tábla sorainak a helyét is módosítottad. Ezután is teheted mindkettőt, ahova akarod, csak most már a saját károdra. Az ilyen változások a makró átírása után működnek jól. Nem viccből kérdeztem rá kétszer is, hogy hol helyezkednek el az egyes egységek.

  A késésben lévő járatok a fekete táblázatban felülre kerülnek, a többiek az időpontnak megfelelően növekvő sorrendben ezek alá.

  Tapasztalatból tudom, hogy a bejelentett kb. 10 perc késés lehet akár 20 is, ezért az ilyen járatokat manuálisan kell törölnöd a fekete tábláról a H:Q tartományból. Esetleg a törlés után javítod a bal oldali táblában, és újra beíratod a nyíl segítségével a jobb oldaliba.

  A makró elején látsz egy értékadást.
  lapnev = "Második"
  Ebben írd át a Második-at a lapod végső nevére, ne feledkezz meg az idézőjelekről!

• #23804 Delila_1 veterán Xterms #23795

  Új Válasz 2014-10-18 09:52:00 #23804

  Ú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

  

  Delila_1

  veterán

  válasz Xterms #23795 üzenetére

  Szerintem jobb, ha felülről kezdődik a fekete tábla kitöltése.
  Itt az újabb verzió.

• #23799 Delila_1 veterán Xterms #23795

  Új Válasz 2014-10-17 19:15:09 #23799

  Ú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

  

  Delila_1

  veterán

  válasz Xterms #23795 üzenetére

  Róland ötlete szerint írtam a makrót, a füzetet feltettem ide.

• #23794 róland veterán Xterms #23793

  Új Válasz 2014-10-17 17:27:51 #23794

  Ú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

  

  róland

  veterán

  válasz Xterms #23793 üzenetére

  Én lehet picit módosítanék rajta:

  Az "A" táblázat sorainak végére végére tennék gombot, ami az adott sort a "B" táblázat utolsó üres sorába másolja. Amennyiben nincs több üres, úgy törli a legelső ssort, eggyel feljebb mozgatja a többi, majd az így üresedő sorba másol.

• #23788 Delila_1 veterán Xterms #23787

  Új Válasz 2014-10-17 14:04:33 #23788

  Ú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

  

  Delila_1

  veterán

  válasz Xterms #23787 üzenetére

  Na és hol van helyileg az A és B listád? Add meg a címet, pl. az A1-ben kezdődik az A lista, a B pedig a "másiklap" nevű lap A1 cellájában.

  Kopik a harapófogóm, amivel ki kell húzni belőled az információkat.

• #23786 Delila_1 veterán Xterms #23784

  Új Válasz 2014-10-17 13:14:38 #23786

  Ú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

  

  Delila_1

  veterán

  válasz Xterms #23784 üzenetére

  Na és hova másolja a kijelölt sort? Az aktuális lapon valahova, vagy egy másik lapra, az utóbbinál hova?

  Nem jó tipp, hogy cseppenként adagolod a feladatot, mert minden csepp után át kell alakítani a képleteket, vagy a makrót.

• #23779 Delila_1 veterán Xterms #23761

  Új Válasz 2014-10-17 08:47:08 #23779

  Ú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

  

  Delila_1

  veterán

  válasz Xterms #23761 üzenetére

  Az A oszlopba írtam az adatokat, B-be gombok helyett csak a Windings betűtípus 0240-es kódját tettem. A fekete hátterű cellák a C oszlopban vannak.
  A makrót a laphoz kell rendelni.

  Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  Dim sor As Long
  sor = Target.Row
  If Target.Column = 2 Then
  If Cells(sor, 3) = "" Then
  Cells(sor, 3) = Cells(sor, 1)
  Else
  Application.DisplayAlerts = False
  Do While Cells(sor, 3) <> ""
  Cells(sor, 3) = Cells(sor + 1, 3)
  sor = sor + 1
  Application.DisplayAlerts = True
  Loop
  End If
  End If
  End Sub

• #23771 m.zmrzlina senior tag Xterms #23761

  Új Válasz 2014-10-17 06:52:24 #23771

  Ú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

  

  m.zmrzlina

  senior tag

  válasz Xterms #23761 üzenetére

  Kérdés:
  A kijelölt sor egyetlen cella tartalma vagy az egész (aaaaaa tól ffffff-ig) tartozik egy cellába?

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