| | ||
| | |||
| Access Tips | |||
   |
|||
 #297 |
 |
ラベルの標題の末尾に付けられたコロンを取り除く | フォーム、VBA |
ウィザードを使って作成したフォームやレポート、フィールドリストからドラッグ＆ドロップで配置した連結コントロールなどでは、テキストボックスなどに関連したラベルコントロールの標題の末尾に「:（コロン）」が付けられることがあります。 例：  ここでは、VBAのプログラムを使って、そのコロンを一括して取り除く方法を紹介します。 次のプログラムは、"rpt売上明細"という名前のレポートを対象とした例で、そのレポートのデザインビューを開いた状態で、標準モジュールより次のコードを実行します。 Dim rpt As Report
Dim ctl As Control Set rpt = Reports("rpt売上明細") For Each ctl In rpt.Controls With ctl If .ControlType = acLabel Then If Right$(.Caption, 1) = ":" Then .Caption = Left$(.Caption, Len(.Caption) - 1) End If Debug.Print .Caption & "*" End If End With Next ctl 実行後のデザイン：  ※このコードはデザイン時に一時的に使うだけのものですので、すぐに削除してもよいですし、またの機会に備えて保存しておいてもかまいません。 |
|||
|
|
|||
| Copyright © T'sWare All rights reserved |   |