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

• #22401 slashing senior tag madrol #22398

  Új Válasz 2014-07-10 18:31:02 #22401

  Ú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

  

  slashing

  senior tag

  válasz madrol #22398 üzenetére

  nem lehet szétszedni, így kell bevinni az adatot amit egy másik munkalapon szét kell szórni szép nyomtatható formába ahol egyszer szerepel ennek a cellának a teljes tartalma meg egyszer az hogy honnan indult a hibás gyártás a kötőjellel elválasztva lévők a tól - ig a vesszővel amikor itt is ott is van hiba stb...

  amúgy a képlet hossza végül 680 karater lett mivel ki kellett egészíteni minden részét egy fkeressel illetve mivel van még egy ugyan ilyen cella a táblázatba így össze kellett vonni a kettőt egybe így duplázodott az egész tesztjeim alapján kb. 95% pontossággal működik bár általában dolgozói hiba az ok.

  =HA(ÉS(HIBÁS(SZÖVEG.KERES("-";FKERES(W3;Táblázat1;6;0)));HIBÁS(SZÖVEG.KERES(";";FKERES(W3;Táblázat1;6;0))));FKERES(W3;Táblázat1;6;0);HA(HIBÁS(SZÖVEG.KERES("-";FKERES(W3;Táblázat1;6;0)));BAL(FKERES(W3;Táblázat1;6;0);SZÖVEG.KERES(";";FKERES(W3;Táblázat1;6;0))-1);BAL(FKERES(W3;Táblázat1;6;0);SZÖVEG.KERES("-";FKERES(W3;Táblázat1;6;0))-1)))&" "&HA(ÉS(HIBÁS(SZÖVEG.KERES("-";FKERES(W3;Táblázat1;8;0)));HIBÁS(SZÖVEG.KERES(";";FKERES(W3;Táblázat1;8;0))));FKERES(W3;Táblázat1;8;0);HA(HIBÁS(SZÖVEG.KERES("-";FKERES(W3;Táblázat1;8;0)));BAL(FKERES(W3;Táblázat1;8;0);SZÖVEG.KERES(";";FKERES(W3;Táblázat1;8;0))-1);BAL(FKERES(W3;Táblázat1;8;0);SZÖVEG.KERES("-";FKERES(W3;Táblázat1;8;0))-1)))

• #22399 Delila_1 veterán madrol #22397

  Új Válasz 2014-07-10 14:33:09 #22399

  Ú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 madrol #22397 üzenetére

  Már nincs előttem a füzeted, de úgy emlékszem, A2-ben kezdődtek a cikkszámok (vagy mik).

  Ez elé akarsz tenni olyan sorszámot, ami az azonos cikkszámoknál megegyezik? Ha igen, szúrj be egy oszlopot az A elé. A2-be írj egy 1-est. Az A3 képlete (ezt kell majd másolnod) =HA(B3=B2;A2;A2+1)

• #22351 Delila_1 veterán madrol #22349

  Új Válasz 2014-07-08 19:53:44 #22351

  Ú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 madrol #22349 üzenetére

  Az export lap A2 cellája most ='KÉP KÉSZÍTŐ'!Q2
  Mi lenne, ha a végére fűznél valamit, pl. ='KÉP KÉSZÍTŐ'!Q2&"_"& SOR()-1
  Akkor nem lenne 2 egyforma ID. A sor() függvény az aktuális sor számát adja.

  A képkészítő Q oszlopában nem kell a lapra hivatkoznod, hiszen a saját lap celláiból veszi az értékeket. Elég a =HELYETTE(D2;"_";"")&F2 képlet.

• #22348 Delila_1 veterán madrol #22343

  Új Válasz 2014-07-08 17:40:33 #22348

  Ú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 madrol #22343 üzenetére

  Jó lenne egy kép az adataidról – tartalmazva a sor- és oszlopazonosítókat.

• #22343 madrol csendes tag madrol #22333

  Új Válasz 2014-07-08 15:45:04 #22343

  Ú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

  

  madrol

  csendes tag

  válasz madrol #22333 üzenetére

  Valakinek valami ötlete?

• #22334 Delila_1 veterán madrol #22332

  Új Válasz 2014-07-08 11:16:13 #22334

  Ú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 madrol #22332 üzenetére

  A lenti sor elé be kell írnod annak a lapnak a nevét, ahova írjon.

  Cells(sor, "A") = szoveg * 1

  helyett

  Sheets("Ideírjon").Cells(sor, "A") = szoveg * 1

  Ehhez maradhat a 35°C a helyiségben.

• #22333 madrol csendes tag madrol #22332

  Új Válasz 2014-07-08 11:16:09 #22333

  Ú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

  

  madrol

  csendes tag

  válasz madrol #22332 üzenetére

  igazából lehet, hogy valaki tudna jobb tippet adni arra, amivel szenvedek.
  Termék ID-t kellene létrehoznom, cikkszám alapján.
  Minden termékből több sor van, és valahogy be kellene számoznom őket.

  Igazából már a cikkszám verzióról kezdek letenni, mert valamiért most a 350 termékből csak 160-at importált be a webshop, valószínűleg nem tetszik neki hogy túl hosszúak a számok.
  Ha lerövidítem, akkor meg egyezések lehetnek, és na mind1...

  Valaki tud arra megoldást ajánlani, hogy be sorszámozzam úgy a táblázatot, hogy több sorszám is megegyezik?

  Köszi előre is

  MaDRoL

• #22331 Delila_1 veterán madrol #22330

  Új Válasz 2014-07-08 11:08:58 #22331

  Ú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 madrol #22330 üzenetére

  Azzal csak annyi a baj, hogy bent maradnak a képletek (erőmű), hacsak nem írod felül őket egy irányított beillesztéssel.
  Azért megírtam a makrót, az A oszlopban lévő vegyes adatokat írja felül. 16000 sorral 1 mp alatt végez.

  Sub CsakSzam()
  Dim sor As Long, usor As Long, b As Integer
  Dim adat As String, szoveg As String
  
  Application.ScreenUpdating = False
  
  usor = Range("A" & Rows.Count).End(xlUp).Row
  For sor = 1 To usor
  szoveg = ""
  adat = Cells(sor, "A")
  
  For b = 1 To Len(adat)
  If Mid(adat, b, 1) Like "[0-9]" Then _
  szoveg = szoveg & Mid(adat, b, 1)
  Next
  Cells(sor, "A") = szoveg * 1 '*****************
  Next
  Application.ScreenUpdating = True
  End Sub

  A csillaggal jelzett sort Cells(sor, "B") = szoveg * 1-re átírva a B oszlopba írja a kigyomlált részt.

• #22329 Delila_1 veterán madrol #22328

  Új Válasz 2014-07-08 10:40:13 #22329

  Ú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 madrol #22328 üzenetére

  A 2013-as Excel a Lappy által belinkelt oldal szerint alapból ad megoldást.

  Ha alacsonyabb verziót használsz, alkalmazhatod az idézett oldal makróját, vagy ha megadod, hogy melyik oszlopban, honnan kezdve vannak az adataid, én is megírhatom a makrót, ami függvények nélkül írja be az eredményt (hova? esetleg a vegyesen használt számok és betűk eredeti helyére?).

• #22328 madrol csendes tag madrol #22327

  Új Válasz 2014-07-08 10:29:05 #22328

  Ú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

  

  madrol

  csendes tag

  válasz madrol #22327 üzenetére

  bocsi, megvan, csak nem volt engedélyezve a felső menün -.-

  

  igen ám, de egy 13000 soros excel táblánál egy erőmű is elköll a házhoz...

  Köszönöm mindenkinek a segítséget, úgy néz ki sikeredik.

  Üdv Mindenkinek: MaDRoL

• #22326 Delila_1 veterán madrol #22322

  Új Válasz 2014-07-08 10:10:34 #22326

  Ú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 madrol #22322 üzenetére

  Írtam rá egy függvényt, a neve CsakSzam.

  Ha az adatod az A1 cellában van, akkor az =csakszam(A1) függvény megoldja a problémádat.

  Function CsakSzam(adat As String)
  Dim b As Integer
  For b = 1 To Len(adat)
  If Mid(adat, b, 1) Like "[0-9]" Then _
  CsakSzam = CsakSzam & Mid(adat, b, 1)
  Next
  CsakSzam = CsakSzam * 1
  End Function

• #22325 lappy őstag madrol #22324

  Új Válasz 2014-07-08 10:04:10 #22325

  Ú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

  

  lappy

  őstag

  válasz madrol #22324 üzenetére

  akkor ez kell neked

• #22323 lappy őstag madrol #22322

  Új Válasz 2014-07-08 09:14:50 #22323

  Ú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

  

  lappy

  őstag

  válasz madrol #22322 üzenetére

  itt nézd meg!!

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