Fóruns Microsoft Excel - 2... 2024 - VBA & Macros Somar +1 em célula ... Notifications Clear all Somar +1 em célula ativa 2024 - VBA & Macros Post Recente por Fernando Fernandes 7 anos atrás 2 Posts 2 Usuários 0 Reactions 602 Visualizações RSS Bretcholaz (@bretcholaz) Posts: 1 New Member Topic starter Olá! Gostaria de saber se é possível especificar no código seguinte a instrução de somar +1 na célula ativa, ao invés de a1. Obrigado! Sub somaum() Range("a1").Value = Range("a1").Value + 1 End Sub Postado : 31/05/2017 8:49 am Fernando Fernandes (@fernandofernandes) Posts: 43750 Illustrious Member Sub somaum() activecell.Value = activecell.Value + 1 End Sub Existem mil maneiras de preparar Neston. Invente a sua! http://www.youtube.com/ExpressoExcel Postado : 31/05/2017 8:53 am