2. Fórumok
  3. OS, alkalmazások
  4. Microsoft Excel topic
  5. (kiemelt téma)
  • PROHARDVER!
    Frissítve: 2023-11-13 08:31 Téma összefoglaló
    PROHARDVER!

    A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
    Kérdés felvetése előtt olvasd el, ha még nem tetted.

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

  • Delila_1 Delila_1 veterán
    #11358
    #11356 balu999
    Új Válasz
    Ú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
    Delila_1
    Delila_1
    veterán
    #11356 balu999

    Több kép esetén beszúrod a több képet, beállítod a méretüket, elhelyezed.

    Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Select Case Target.Address
    Case "$A$1"
    If ActiveSheet.Shapes("Picture 1").Visible = True Then
    ActiveSheet.Shapes("Picture 1").Visible = False
    Else
    ActiveSheet.Shapes("Picture 1").Visible = True
    End If
    Case "$A$2"
    If ActiveSheet.Shapes("Picture 2").Visible = True Then
    ActiveSheet.Shapes("Picture 2").Visible = False
    Else
    ActiveSheet.Shapes("Picture 2").Visible = True
    End If
    Case "$A$3"
    If ActiveSheet.Shapes("Picture 3").Visible = True Then
    ActiveSheet.Shapes("Picture 3").Visible = False
    Else
    ActiveSheet.Shapes("Picture 3").Visible = True
    End If
    End Select
    End Sub

    A Case kezdetű sorokban azt adod meg, hogy melyik cellára akarsz duplán kattintani, az alatta lévő sorokban pedig azt, melyik kép jelenjen meg - tűnjön el a duplaklikkre.
    A sort folytathatod az End Select sorig.

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