o que tem de errado nesse código na hora de editar uma celula preenchida...
- Código:
Linha = Sheets(g).Cells(1048576, col).End(xlUp).Row + 1
Linha = Sheets(g).Cells(1048576, col).End(xlUp).Row + 1