Új hozzászólás Aktív témák

• #27644 Delila_1 veterán Polllen #27642

  Új Válasz 2015-07-08 15:31:00 #27644

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Delila_1

  veterán

  válasz Polllen #27642 üzenetére

  Az kell bele, mert több azonos szállítólevél is lehet. Ha ezeknek új lapot próbálnék bevinni, egyrészt hibára futna, másrészt minden sort külön lapra tenne.

  A lapokat egy új kigyűjtés előtt egy makróval törölheted.

  Sub Laptorles()
  Dim lap As Integer
  
  Application.DisplayAlerts = False
  For lap = Sheets.Count To 2 Step -1
  Sheets(lap).Delete
  Next
  
  Application.DisplayAlerts = True
  End Sub

Új hozzászólás Aktív témák