Add sheet via IF() commando

[Cleaner]

BEste,

Ik heb reeds een en ander opgezocht op internet en op dit forum maar kom er niet uit.
ik ben trouwnes blij om te zien dat er een forum is mbt Excel want ik heb een nieuwe functie en krijg nu veel te maken met excel en wil er dus ook wat handiger in worden.

het volgende is mijn probleem:
Als een cel een bepaalde waarde overschrijdt dan wil ik dat een template in de openstaande excel workbook achteraan ingevoegd wordt.
ik heb nu deze regel gemaakt, echter als ik de waarde op 500 zet krijg ik een melding "#NAME?"

=IF(O5>400; SHEETS(K:\Logistics\Work Preparation\Supplier Performance\Rejects\QualityReportTemplate.xltx))

Ik heb enige programmeerervaring maar daar kom ik nergens mee binnen excel helaas...

zou iemand mij uit de rats kunnen helpen?

dank alvast,

groet,
Coen

 

[ExcelAmateur]

Kijk een op de link.
http://www.helpmij.nl/forum/showthread.php/675073-Werkblad-aanmaken-d-m-v-knop?highlight=Blad+aanmaken

 

[Cleaner]

Hallo ExcelAmateur, dankje voor je bericht,
in tegenstelling tot de inhoud van je link, wil ik dat de actie begint nadat een bepaalde in een cel wordt overschreden. is dat mogelijk?

 

[ExcelAmateur]

Heb je al geprobeerd om de If aan te passen?

Het beste is om een bestandje te plaatsen met het geen je wil als voorbeeld.
Dit zonder gevoelige info uiteraard.

Er zijn hier VBA specialisten die dit denk ik wel kunnen oplossen, met geleverd voorbeeld.

 

[ExcelAmateur]

Kijk of je dit bedoel.

 

[Cleaner]

Hallo ExcelAmateur,

goed idee, dankje, ik heb het excel bestand bijgevoegd, in het excelbestand staat ook al de empty report op het laatste tabblad, dit mag gebruikt worden om door te kopieren, echter mag ook een template gebruikt worden uit de zelfde folder als waar de lijst staat, deze template heb ik niet bijgevoegd.
zodra de nieuwe sheet aangemaakt is, zou deze ook de naam moeten krijgen van het bijhorende nummer in kolom A (QR-nummer)

zou te gek zijn als dit lukt..

dank!

 

[Cleaner]

Hallo Excelamateur,

jou test bestand werkt!! lachen!
thnx! nu is het wel zo dat elke keer dat ik naar blad 1 ga er een nieuwe template komt achteraan. dus heb ondertussen 15 templates. die loop zou dus maar 1 keer voor moeten komen per rij.
groet,

 

[VenA]

Mogelijk dat dit de bedoeling is. Als er in kolom O een getal groter dan 400 ingevoerd wordt, wordt er een nieuwe tab aangemaakt met de naam van het getal in kolom A

 

[snb]

Zet in de gebeurteniscode van werkblad QR-list

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Count > 1 Then Exit Sub
  If Target.Column = 15 And Target.Row > 1 And Target > 400 Then
      Sheets("empty report").Copy Sheets("empty report")
      ActiveSheet.Name = Cells(Target.Row, 1)
  End If
End Sub

NB1. verwijder alle 'merged cells'
NB2. verwijder de eerste drie overbodige rijen in werkblad QR-list: dan houd je een werkbaar gestructureerde lijst (te convertereen naar een tabel (VBA: listobject) over.
NB3. Maak je de basisbegrippen van Excel en VBA eigen met de beoeken Exce' resp. VBA voor Dummies. Dan gaat je kennis en het gebruik van dit soort fora met sprongen vooruit.

 

[Cleaner]

Mensen, Bedankt! het werkt, ben echt een excel noob blijkbaar, met vba kan je blijkbaar behoorlijk wat uitbreiden op Excel, das mooi!
bedankt!
heb d code van VenA gebruikt , die is wat makkelijker te bewerken.