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

• #37713 Delila_1 veterán d@minator #37712

  Új Válasz 2018-04-03 18:37:59 #37713

  Ú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 d@minator #37712 üzenetére

  A gombokat csoportba foglalod, és a Csoport neved adod neki.

  Ez a laphoz rendelt makró az A3:D100 cellák bármelyikére kattintva mindig "kéz alá" teszi a csoportodat.
  Írd át a kiválasztott területet a saját igényed szerint.

  Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, [A3:D100]) Is Nothing Then
ActiveSheet.Shapes("Csoport").Top = ActiveCell.Top - 20
ActiveSheet.Shapes("Csoport").Left = ActiveCell.Left + ActiveCell.Width + 20
End If
End Sub

  

  Az RGB kódhoz: keverd ki háttérnek a kedvenc árnyalatodat, és jegyezd meg az RGB értékeket. A makróban így adhatod meg

  Selection.Interior.Color = RGB(100, 200, 170)

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