Jump to content

excel - duvida


quenestil

Recommended Posts

  • 4 weeks later...

Viva!

Podes fazer assim:

Crias um botao, em kk local da folha. (ele nao vai ser impresso)

e colocas-lhe este código:

Private Sub CommandButton1_Click()

    Folha1.Cells(3, 3) = Int(Folha1.Cells(3, 3)) + 1  ;subsitui o 1º 3 pela linha da célula onde queres a contagem automática, e o 2º pela coluna

   

    CommandButton1.Visible = False

    Me.PrintOut

    CommandButton1.Visible = True

End Sub

Tentei usar o evento "BeforePrint" do workbook, mx n funcionou. Era mais pratico se desse dessa maneira.

Mas assim tb funciona

[ ]

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.