- 日時： 2018/11/07 09:06
- 名前： NetDiver
- まだ質問したことはありませんが、次の回答でとても助かりましたのでお礼します。
サンプル投稿用掲示板の「リストビュー列幅自動設定 記事No：14910」(http://hanatyan.sakura.ne.jp/patio/read.cgi?no=295)
というのも、Access2002のVBAでListView(Microsoft ListView Control 6.0(SP4))の列幅を自動調整する方法でつまづいて、
VB6.0だと
Dim ch As ColumnHeader
For Each ch In ListView1.Columns
ch.Width = -2
Next ch
これで出来るみたいですが、VBAだとColumnsプロパティが存在せず、ColumnHeadersで行けたかと思ったら、-1や-2は無効な値と出る始末で途方に暮れていたんです。直接適当な数値で幅指定するしかないと諦めかけましたが、こうなったら文字の幅を取得して列幅調整する方法で出来ないかと「VBA ListView 文字列の幅取得」で検索したら偶然、上記の回答にたどり着きました。
無事にListViewのすべての列幅の自動調整ができました。
APIを使った具体的なコードまで公開していてくれて、どうもありがとうございます。
|
