Cześć, I być żadny ekspert w VBA więc zadawalać niedźwiedź z. I mieć prosty formuła che wkładać nowy rząd między dwa rząd. Komórka I potrzebować być the końcówka punkt the wartość w szczególny komórka. I mieć chowany komórka che kalkulować the poprawny koniec e.g a25 ale móc "a25" the formuła poprawny. Tutaj być co I mieć do tej pory:
Sub Insert_Rows ()
'< br/>' Insert_Rows Macro
'< br/>Dim CurrentSheet Jako Object
' Pętla przez wszystkie wybrany sheets.
For Wybrany CurrentSheet W ActiveWindow.SelectedSheets
' Wszywka n wiosłować w zależności od wartość a1 i a2.
CurrentSheet.Range ("a14: a24"). EntireRow.Insert
Next CurrentSheet
'< br/>End Sub
|
