1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21:
questo codice genererà una gamma chiamata visibile nel responsabile nome, il nome della gamma è obiettivo, esso sembra simile a che cosa lo avete detto provato ma funziona per me in modo da dargli un colpo
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11:
Sub Macro1 () Oscurare l'obiettivo come gamma Gamma (ActiveCell, ActiveCell.End (xlDown)). Prescelto Regolare l'obiettivo = Application.Selection Nome di ActiveWorkbook.Names.Add: = " obiettivo ", RefersTo: =target ActiveWorkbook.Names (“obiettivo„). Commento = "" Sommergibile dell'estremità