(Solved) – A list of Projects in order

  • by

I am working on a project list in excel in which a lot projects with a group of Rows are added as shown in the picture.enter image description here enter image description here
This Code create a new project at the end of sheet after neues projekt is clicked.

Sub projekt_erstellung()
' projekt_erstellung Makro
Dim lines As Integer

Application.ScreenUpdating = False      'congela tela enquanto roda a 
lines = 71  'how many lines contain in the project box (since the ID 
number to the last activity (ET-F))
For project = 1 To 299       'possivel inputar ate 299 projetos
    If Cells((lines   10)   (lines   1) * (project - 1), 13) = "" Then
    Rows("8:80").Select 'to select until the last line   1 (lines   9)
    Range("A80").Activate   'to select until the last line   1 (lines   9)
    Selection.EntireRow.Hidden = False
    Rows("8:79").Select 'to select until the last line (lines   8)
    Rows((lines   10)   (lines   1) * (project - 1) - 1).Select
    Rows("8:79").Select 'to select until the last line (lines   8)
    Range("A79").Activate   'to select until the last line (lines   8)
    Selection.EntireRow.Hidden = True
    Application.CutCopyMode = False
    Cells((lines   10)   (lines   1) * (project - 1), 2).Select
    project = 299
    End If
Next project`enter code here`
End Sub

Actually there is a model project at top and copy of that model is created at end everytime that neues projekt button is clicked. I want that it create project wherever i want like between any 2 projects and how can i put filter on projects ID column.

Leave a Reply

Your email address will not be published. Required fields are marked *