Moderatori: Anthony47, Flash30005
ActiveSheet.Shapes(NomeImm).Visible = False
ActiveSheet.Shapes(NomeImm).Visible = True
Sub Nomesh()
For Each Pict In ActiveSheet.Shapes
NomeImm = Pict.Name
ActiveSheet.Shapes(NomeImm).Select
Addr = Selection.TopLeftCell.Address
MsgBox (NomeImm & " - " & Addr)
Next Pict
End Sub
Torna a Applicazioni Office Windows
Excel: formula automatica per evidenziare prodotto scaduto Autore: gamma_ray |
Forum: Applicazioni Office Windows Risposte: 3 |
Salvare file excel in formato html escludendo le immagini Autore: systemcrack |
Forum: Applicazioni Office Windows Risposte: 10 |
formula excel non visualizza risultato Autore: tommasog |
Forum: Applicazioni Office Windows Risposte: 6 |
Excel 2016 - Funzione SCARTO + INDIRETTO Autore: pl1957 |
Forum: Applicazioni Office Windows Risposte: 2 |
Visitano il forum: Nessuno e 64 ospiti