Aktív témák

• #214 lapa veterán

  2006-04-01 10:48:43 #214

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

  

  lapa

  veterán

  With Assistant.NewBalloon
  .Heading = ''Regional Sales Data''
  .Text = ''Select the region(s) you want to print.''
  For i = 1 To 3
  .CheckBoxes(i).Text = ''Region '' & i
  Next
  .Button = msoButtonSetOkCancel
  If .Show = msoBalloonButtonOK Then
  dataPrinted = 0
  For i = 1 To 3
  If .CheckBoxes(i).Checked = True Then
  ' Code to print region data.
  dataPrinted = dataPrinted + 1
  MsgBox ''Region '' & i & '' data printed.''
  End If
  Next
  If dataPrinted = 0 Then MsgBox ''No data printed.''
  End If
  End With
  
  
  lásd még vba súgó 'checkbox' első találat
  
  [Szerkesztve]

Aktív témák