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

• #51090 Fferi50 Topikgazda joocek #51089

  Új Válasz 2023-06-25 08:13:42 #51090

  Ú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

  

  Fferi50

  Topikgazda

  válasz joocek #51089 üzenetére

  Szia!
  Akkor nincs más hátra, mint makró.
  Ezt a két makrót másold be egy modulba, javítsd át a megfelelő helyeken. A hivo makróban megadhatod, melyik cellából másolja az adatot és hol kezdje a cél munkafüzetben a beírást. Ezáltal több cellát is másolhatsz a hivo makró paramétereinek változtatásával.
  Sub hivo()
beirja "A3", "A1" 'A3 cellából az A1 cellától lefelé fog másolni. Ezt kell átírnod a megfelelő címekre.
End Sub
Sub beirja(ByVal honnan As String, ByVal hova As String)
Dim sh1 As Worksheet, sh2 As Worksheet, celja As Range
Set sh1 = Worksheets("S51") 'S51 helyébe írd a cél munkafüzet nevét
Set celja = sh1.Range(hova)
For Each sh2 In Worksheets
    If sh2.Name <> sh1.Name Then
       celja.Value = sh2.Range(honnan)
       Set celja = celja.Offset(1, 0)
    End If
Next
End Sub
  A munkafüzetet makróbarátként vagy binárisként kell mentened.
  Üdv.
  Ps. Létezik még az Excelben az Adatok - összesítés menüpont, ahol megfelelően struktúrált munkalapok adatai egy munklapra összesíthetők. Talán azt is érdemes lenne megnézned.

• #51088 Fferi50 Topikgazda joocek #51087

  Új Válasz 2023-06-24 15:12:39 #51088

  Ú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

  

  Fferi50

  Topikgazda

  válasz joocek #51087 üzenetére

  Szia!
  Képlettel megoldható, de nem úszod meg a munkalap nevek beírását a képletbe. Pl:
  =Munka1!$A$1 ' ide a cella címe kerüljön a $ jelekkel együtt
  Ezt a képletet húzod lefelé vagy jobbra, attól függően, hova kell az adatoknak kerülni.
  Majd a képletekben levő munkalap neveket átírod a megfelelő névre.
  Üdv.

• #50994 lappy őstag joocek #50993

  Új Válasz 2023-05-16 14:39:31 #50994

  Ú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 joocek #50993 üzenetére

  vba vagy kijelöléspanellel

• #50903 Fferi50 Topikgazda joocek #50899

  Új Válasz 2023-05-02 20:51:48 #50903

  Ú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

  

  Fferi50

  Topikgazda

  válasz joocek #50899 üzenetére

  Szia!
  A feltételes formázás képleteit Delila makrója egyáltalán nem bántja. Sőt, ha megfelelő módon használod az összesítő függvényeket, azokon sem változtat.
  Üdv.

• #50902 Delila_1 veterán joocek #50901

  Új Válasz 2023-05-02 20:46:37 #50902

  Ú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 joocek #50901 üzenetére

  Az első példádban vizet és gázt írtál, nem a beosztást nevekkel. Most is megteheted, de elküldheted a fájlt privátban is.

• #50900 Delila_1 veterán joocek #50899

  Új Válasz 2023-05-02 20:41:45 #50900

  Ú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 joocek #50899 üzenetére

  Tegyél fel egy példát a saját képleteiddel!

• #50898 Delila_1 veterán joocek #50897

  Új Válasz 2023-05-02 20:33:33 #50898

  Ú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 joocek #50897 üzenetére

  Ha összeállítottad, kipróbálhatod. Minden kolléga a neki tetsző lapra írja be az adatokat.
  Bárhova bármit ír, a másik lap megfelelő helyén megjelenik az érték, és nincs egy árva képlet sem.

  Fferi ötlete nyomán...

• #50896 Delila_1 veterán joocek #50895

  Új Válasz 2023-05-02 20:26:53 #50896

  Ú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 joocek #50895 üzenetére

  Két lapon legyen a két táblázat. Elég az egyikre beírni a hónapokat és a tételeket, miután bemásoltad a két makrót.

  Az egyik lap neve Függőleges. Ehhez ezt a makrót másold be:
  Private Sub Worksheet_Change(ByVal Target As Range)
Sheets("Vízszintes").Cells(Target.Column, Target.Row) = Target.Value
End Sub

  A másik lap a Vízszintes, ehhez ez a kód jön:
  Private Sub Worksheet_Change(ByVal Target As Range)
Sheets("Függőleges").Cells(Target.Column, Target.Row) = Target.Value
End Sub

  Makróbarátként kell mentened.
  A Téma összefoglalóban megtalálod, hogyan kell a laphoz rendelni a makrókat.

• #50894 Fferi50 Topikgazda joocek #50892

  Új Válasz 2023-05-02 20:12:15 #50894

  Ú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

  

  Fferi50

  Topikgazda

  válasz joocek #50892 üzenetére

  Szia!
  Aztán akkor mi történjen, ha mindketten ugyanabba a cellába írnak adatot - természetesen a vízsz-függ reláció figyelembe vételével.
  Egyébként a transzponálás függvény pont erre való - a vízszintes - függőleges közötti váltásra.
  Eseménykezelő makróval elérhető, hogy amit az egyik táblába beírtak, ellenőrizze, hogy a másik helyen nincs-e már adat, továbbá át is fordítja a másik táblába, ha nincs semmi akadálya.
  Üdv.

• #50893 Delila_1 veterán joocek #50892

  Új Válasz 2023-05-02 20:05:12 #50893

  Ú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 joocek #50892 üzenetére

  Ugye nem gondolod komolyan, hogy csupán képletek elintézik egymás között a két táblázat kitöltését? Valamelyikbe mégis csak be kell írni az adatokat.

• #50891 Delila_1 veterán joocek #50890

  Új Válasz 2023-05-02 19:43:15 #50891

  Ú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 joocek #50890 üzenetére

  
  A J2 cella képletét másold jobbra, majd le.

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