Сохранить Данные

[valerij]

Нужно, сохранить данные за три месяца.
Наверное, для таких целей, используется двух мерный массив?
Не получается, чего -то.
В листе2 есть выбор месяца, январь, февраль, март.
В листе1, в колонке С, должны отображаться данные в зависимости от месяца.
В листе1, в колонку С, данные всегда вводятся в ручную., кажый месяц
В листе1, в колонке G и I, как пример, данные за др. месяца.
В нормальном виде их там нет.

В январе, вводятся данные( в колонку С), которые сейчас.
В феврале, вводятся данные( в колонку С), которые в колонке G.
В марте, вводятся данные( в колонку С), которые в колонке I.
Макрос в листе1, так, но вложил и пример

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
With Application
    .EnableEvents = False
    Dim iPrices(31, 3) As Single
        [a2] = Sheets(2).Cells(1, 1)
            If [a2] = "Январь" Then месяц = 1
                If [a2] = "Февраль" Then месяц = 2
            If [a2] = "Март" Then месяц = 3
'    If Target.Column = 3 Then
'        For Each x In Target
'            iPrices(x.Row, месяц) = Cells(x.Row, 3)
'        Next
'    End If
'    For idat = 1 To 31
'        Cells(idat + 2, 3) = iPrices(idat, месяц)
'    Next
     .EnableEvents = True
    End With
End Sub

[kuklp]

Ничего не понял - что, откуда, куда, как вводится .
Так проще определять месяц:
[a2] = Sheets(2).Cells(1)
месяц = Month("1 " & [a2].Value & " 2000")

[valerij]

Сообщение от kuklp

Ничего не понял - что, откуда, куда, как вводится

В листе2, выбираеи, Январь.
В листе1, в колонке С, в ручную, набираю, яч. С3 = 0, С4 = 0, С5 = 437,6, С6 = 597,25, ...... С33 = 526,29

В листе2, выбираеи, Февраль.
В листе1, в колонке С, в ручную, набираю, яч. С3 = 522,37, С4 = 527,19, С5 = 527,00, С6 = 494,99, ...... С28 = 490,04, ...... С33 = 0

В листе2, выбираеи, Март.
В листе1, в колонке С, в ручную, набираю, яч. С3 = 517,16, С4 = 546,17, С5 = 470,53, С6 = 464,80, ...... С33 = 692,63

Так, понятней?

[kuklp]

Не, Валер, ни капельки не понятней:-) Если набираешь вручную - зачем макрос?

[valerij]

Сообщение от kuklp

Если набираешь вручную - зачем макрос?

Что бы уже в июле, зайдя в лист2 и выбрав, январь или февраль, или март, смог посмотреть, соответствующие данные.
Когда набиваю данные за февраль, январские данные ведь уничтожу, а надо, что бы январские данные ушли в переменную и когда я эту, январскую переменную вытащу, вытащу и данные.

Наверное, понял, ексель не может хранить данные в переменных, надо записывать в ячейки, а потом от туда читать.

[tae1980]

Сообщение от valerij

Что бы уже в июле, зайдя в лист2 и выбрав, январь или февраль, или март, смог посмотреть, соответствующие данные.
Когда набиваю данные за февраль, январские данные ведь уничтожу, а надо, что бы январские данные ушли в переменную и когда я эту, январскую переменную вытащу, вытащу и данные.

А почему бы не прикрепить файл с примером?

Сообщение от valerij

Наверное, понял, ексель не может хранить данные в переменных, надо записывать в ячейки, а потом от туда читать.

Ексель может хранить даные в переменных.

[valerij]

Сообщение от tae1980

Ексель может хранить даные в переменных.

Это, если я их ручками, пропишу. Простой пример.
Вводим сегодня в А1:А100 данные, 555, а завтра, в А1:А100 данные, 22, где же эксель будет хранить 555?