| |
▼kawata さん：
こんにちは。
>kawataです、いつもお世話になっております。
>よろしくお願いします。
>(Windows2000/Excel2000)
>
>ある報告用のシートを作成しています。
>１〜４行目までは、ブックのタイトルとかボタンの配置用に使用。
>４〜３２行目までが、シートのヘッダ部分となっており、３４行目
>以降に、データを入力していきます。
>で、こちらの一般的な環境ですと、画面フル表示にしても、入力部分
>が４〜５行しか見えません。
>というわけで、下記のようなマクロを組んだのですが・・・、
33行目あたりでウインドウを固定しているんですよね？
簡単に記述エリアが広がったり、縮まったりで良いと思いますけどねえ！！
>一応望みとおりの動作はします、しかし、常時イベントひろいっぱなし
>で画面がチラチラしてどうもうまくありません。
これは、Hiddenプロパティが元々Trueなのに、さらにTrueを設定したり、
Falseなのに再度、Falseにしていることも原因になっていませんか？
>Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
> If Sh.Name <> "body" Then Exit Sub
> If Target.Row > 33 Then
If Rows("4:32").EntireRow.Hidden = False Then
> Rows("4:32").EntireRow.Hidden = True
End If
> Else
If Rows("4:32").EntireRow.Hidden = True Then
> Rows("4:32").EntireRow.Hidden = False
End If
> End If
>End Sub
とすると、少しは、良いみたいですが・・・・。
|
|
ichinose
- 03/11/12(水) 17:13 -
