Wie Taste genau in einer Zelle platzieren

Question

fand ich ein Stück Code, das eine Schaltfläche innerhalb der Grenzen einer Zelle platzieren soll:

irgendwie über die vorherige Zeile

'put a button in a cell for easy access to the value 
    Set lastRow = table.ListRows(table.ListRows.Count).Range 
    Set targetCell = sheet.Range(lastRow(columns("Button1").Index).Address) 
    Set btn = sheet.Buttons.Add(targetCell.Left, targetCell.Top, targetCell.Width, targetCell.Height) 

Problem ist, dass die Taste platziert ist halb durch. Gibt es eine Möglichkeit, das Placement zu kalibrieren, oder stimmt da etwas nicht?

Answer 1

"targetCell.Left, targetCell.Top, targetCell.Width, targetCell.Height" Selbst ist eine perfekte Caliberation. Ich brauche nur das Bild des BTN, das falsch platziert ist.