2017-10-09 14 views
0

ユーザーが複数のグラフの境界を一度に変更できるようにしています。私は最初のページにすべてのものを見なければならない方法を考え出しました。そして今、最初のページのように見えるように一度に11ページを追加できる方法があるかどうか疑問に思っています。私のuserformが以下に表示されます。VBA:userform複数ページのテンプレート

Userform

私は、このために設計段階ではまだです。デザインにこれ​​を行う方法があれば、それはすばらしいでしょう。 Initializeサブステップで行う方法があれば、それも素晴らしいでしょう。

+0

あなたが完全な操作を行う場合1つから選択するペーストして別のペーストに貼り付けてください。しかし完璧ではない。 – PGCodeRider

+1

もしあなたが** TabStrip **をMultiPageの代わりに**類似していると思うかもしれません。これらのテキストボックスの隣に** SpinButton **を追加するようアドバイスしてください。 – PatricK

答えて

2

自分の使用目的に基づいて、あなたは内のほとんどのコントロールは、同じレイアウト(コントロールの同じ量)あることのTabStrip代わりのマルチページを使用する必要があります。 MultiPageは、各ページの異なるコントロールでデータを分類するためのものです。

はここのTabStripを使用する利点をdemostrateするために、この単純なユーザーフォームを考えてみましょう:

UserForm Design
左側の四角は、私がためのコードを入れていないピクチャーホルダーです。

以下のタブの変更を処理するコードでは、別のタブをクリックするとuserformの特定の要素が変更されます。 (UserForm_Initializeを設定せずに)ユーザーフォームを起動する際に

Option Explicit 

Private Sub TabStrip1_Change() 
    Dim TabX As String 
    With Me.TabStrip1 
     TabX = .Tabs(.Value).Caption 
     Debug.Print "ActiveTab:", TabX 
    End With 
    Me.Frame1.Caption = "Maximum Bounds (" & TabX & ")" 
    Me.Frame2.Caption = "Minimum Bounds (" & TabX & ")" 
    Me.TextBox1.Value = "TextBox2 for " & TabX ' Forgot to change this Value to TextBox1 before the screenshot... 
    Me.TextBox2.Value = "TextBox2 for " & TabX 
End Sub 

  1. FirstLaunch
  2. TAB2をクリック:
    Tab2Click
  3. Tab1をクリックした:
    Tab2Click
+0

ありがとう!これは私の最初のユーザーフォームへの進出であり、私は主に自分自身を教えています。あなたの答えはとても役に立ちます! –

関連する問題