A solução apresentada abaixo (código e formulário com o resultado dos testes) foi feita usando "Controls" para tratar os objetos de cada grupo.
Private Sub CommandButtonTeste_Click()
Dim Bandeira As Variant
'Pega o ícone da bandeira desejada
Set Bandeira = LoadPicture("F:\Teste\Japao.ico")
'Teste #1: Altera todos os dados do primeiro grupo
GrupoDeObjetos 1, True, True, _
"Japão", _
Bandeira, _
"Arroz", _
"Perda", _
"Troca"
'Teste #2: Torna os objetos do Segundo grupo invisíveis
GrupoDeObjetos 2, False, True
'Teste #3: Desabilita os objetos do terceiro grupo
GrupoDeObjetos 3, True, False
'Teste #4: Força um erro, pois o grupo 4 não existe
GrupoDeObjetos 4, True, True
End Sub
Public Sub GrupoDeObjetos( _
ByVal IndiceDoGrupo As Integer, _
ByVal GrupoVisivel As Boolean, _
ByVal GrupoHabilitado As Boolean, _
Optional ByVal LegendaDoFrame As String = "", _
Optional ByVal Imagem As Variant = "", _
Optional ByVal LegendaDaImagem As String = "", _
Optional ByVal LegendaDoBotao1 As String = "", _
Optional ByVal LegendaDoBotao2 As String = "")
Dim i As Integer
'Verifica o índice
If IndiceDoGrupo < 1 Or IndiceDoGrupo > 3 Then
Beep
MsgBox "Índice do Grupo de Objetos inválido!" & _
Chr(13) & Chr(13) & _
"Índice: " & IndiceDoGrupo
Exit Sub
End If
'Tratamento dos objetos do grupo
' Atualiza o índice do grupo com o valor
' do índice dos controles no formulário
Select Case IndiceDoGrupo
Case 1
'Índice do Frame1 no formulário
IndiceDoGrupo = 0
Case 2
'Índice do Frame2 no formulário
IndiceDoGrupo = 5
Case 3
'Índice do Frame3 no formulário
IndiceDoGrupo = 11
End Select
'Atualiza dados do objeto se os dados foram passados
If LegendaDoFrame <> "" Then Me.Controls(IndiceDoGrupo).Caption = LegendaDoFrame
If Imagem <> "" Then Me.Controls(IndiceDoGrupo + 1).Picture = Imagem
If LegendaDaImagem <> "" Then Me.Controls(IndiceDoGrupo + 2).Caption = LegendaDaImagem
If LegendaDoBotao1 <> "" Then Me.Controls(IndiceDoGrupo + 3).Caption = LegendaDoBotao1
If LegendaDoBotao2 <> "" Then Me.Controls(IndiceDoGrupo + 4).Caption = LegendaDoBotao2
'Trata os objeto do grupo (Visible/Enabled)
For i = 0 To 4
'Grupo visível ou não
Me.Controls(IndiceDoGrupo + i).Visible = GrupoVisivel
'Grupo habilitado ou não
Me.Controls(IndiceDoGrupo + i).Enabled = GrupoHabilitado
Next i
End Sub
Observe no código que o IndiceDoGrupo é uma única variável tratada de dois modos diferentes:
1. Ao se chamar a rotina este índice aponta para o grupo desejado, neste caso os grupos de valores 1, 2 e 3.
2. No código, conforme o grupo escolhido para tratar, esta variável recebe o valor do índice do Frame do grupo, neste caso 0, 5 e 11 respectivamente para os grupos 1, 2 e 3.
Repare que cada grupo tem 5 objetos, como o grupo 2 foi criado imediatamente após o grupo 1, o índice de seu Frame é o 5. (os objetos do grupo 1 tem os índices: 0, 1, 2, 3 e 4)
A diferença do índice do grupo 3 ser 11 e não 10, é que o Label3 foi inserido no formulário antes desse grupo, portanto, o Label3 obteve o índice 10.
IMPORTANTE!
Para que este código funcione adequadamente, ao criar seu grupo de objetos insira cada objeto do grupo na sequência que pretende trabalhar, e não insira nenhum outro objeto que não seja deste grupo até terminá-lo.
Agrupe-o, coloque na caixa de ferramentas e pronto, basta tratar o índice de cada novo objeto que colocar no formulário (neste caso, iniciando de 1).
Este é o resultado dos testes:

Observe que são quatro testes, mas não apresentei a caixa de diálogo gerada pelo erro proposital do teste #4 (ela foi fechada antes do PrintScreen), para ficar fácil identificar na imagem acima o ocorrido:
1. Todos os dados do grupo 1 foram alterados, incluindo a imagem da bandeira
2. O grupo 2 ficou invisível
3. O grupo 3 ficou desabilitado, porém, apesar da imagem também estar desabilitada, ela não fica "esmaecida" (não fiz este efeito no exemplo)
4. A mensagem de erro causada por se chamar um quarto grupo que não existe no formulário gerou a mensagem de erro apropriada (não apresentei)
COMPLEMENTO
Caso o Label3 seja deletado do formulário, o índice do terceiro objeto mudará, para resolver isso pode-se criar uma rotina para buscar o índice do primeiro objeto do grupo ao se inicializar o formulário, por exemplo.
Sugestão simples de chamada da rotina:
Dim Indice1, Indice2, Indice3 as Integer
Indice1 = IndiceDoObjeto(UserForm1, "Frame1")
Indice2 = IndiceDoObjeto(UserForm1, "Frame2")
Indice3 = IndiceDoObjeto(UserForm1, "Frame3")
Caso o objeto não seja localizado no formulário eu indicaria informar por meio de uma mensagem e sair do programa imediatamente após a mensagem, pois não faz sentido prosseguir havendo este tipo de erro.
Desta forma não ocorrerá erros ao manipular objetos entre os grupos.
ORGANIZAÇÃO NA ORDEM DOS ÍNDICES DOS OBJETOS NO GRUPO
Ao trabalhar com grupos deste tipo (bem mais extensos), me deparei com um problema que pode ocorrer de duas formas:
Se os objetos de um grupo não foram criados na ordem desejada ou intuitiva (a partir do primeiro de cima à esquerda até o último de baixo à direita), o índice de cada objeto no grupo evidentemente não acompanhará esta ordem, o que dificulta - pelo menos - o tratamento inicial dos mesmos no código.
Se for alterada a posição ou ordem de exposição do objeto no formulário, com o "Trazer para frente" ou "Enviar para trás", por exemplo, os índices dos objetos no formulário são alterados, então pode ocorrer de um objeto do grupo ser "substituído" por outro no tratamento aos objetos do grupo ou mesmo todos os objetos terem seus índices alterados (caso de trazer para frente um objeto que foi criado antes do grupo).
Como solução, fiz um teste, passei a ordenar os objetos conforme o desejado, de forma que seus índices ficassem na ordem "intuitiva". Para tanto, fiz isso em um novo formulário, para não haver problema com outros objetos que poderiam interferir neste processo.
Então, sem precisar "reagrupar", pois permaneceram "agrupados" mesmo com os recursos do tipo "Avançar" e "Recuar", por exemplo, ao final o coloquei na caixa de ferramentas.
Neste momento, este novo grupo ficou ordenado como desejado, ou seja, ao inseri-lo em qualquer formulário, a ordem dos índices de seus objetos mantêm a ordem em que alterei no grupo.
SOLICITAÇÃO
Caso existam outras formas de se fazer isso, inclusive por meio de Classes de objetos com propriedades para passar estes dados, se puderem postar aqui um exemplo eu ficaria muito grato!
Controls
do frame?