Thema: Preisberechnung über Materialliste

Home

Gruppe

Funktion

Problem

Aus der Kombination Bauteil, Materialcode, Anzahl und Größe soll der Preis aufgrund der Basispreise aus Blatt Materialliste ermittelt werden.

Lösung

Darstellung nur anhand einer Beispielarbeitsmappe möglich.

StandardModule: Modul1

Sub PowerPointStarten()
   Dim ppApp As Object
   Dim ppP As Object
   Dim sFile As String
   sFile = ThisWorkbook.Path & "\3ulrich.ppt"
   If Dir(sFile) = "" Then
      Beep
      MsgBox "Die Datei " & sFile & " existiert nicht!"
      Exit Sub
   End If
   Set ppApp = CreateObject("PowerPoint.Application")
   ppApp.Visible = msoTrue
   Set ppP = ppApp.Presentations.Open(sFile)
   ppP.SlideShowSettings.Run
   ppApp.Quit
   Set ppP = Nothing
   Set ppApp = Nothing
End Sub

Beiträge aus dem Excel-Forum zu den Themen Funktion und INDEX

Copy funktioniert nur einmal	Schreibschutz prüfen funktioniert nicht
Split-Funktion beim Einlesen TXT-Datei	Match Funktion spinnt (?)
SVerweis funktioniert nicht	PasteSpecial funktioniert nicht.
VERGLEICH/INDEX Formelproblem	VBA-Code funktioniert nicht mit anderem Office
Hilfe bei der INDEX Funktion	Index Formel_Berechnung nur bei bestimmten Wert
neues Aktien Index Problem	Array - Index außerhalb des gültigen Bereichs
Zelladressen von FunktionsParametern ermitteln	Index Vergleich Formel mit Summenformel
Matrixformel mit Summenfunktion	Formel funktioniert nicht, SVerweis
Makro funktioniert nach Beenden von Excel nicht	VLOOKUP auf Links funktioniert offline
Formel Index(RGP	@DAVID Zwei SUMMEWENN funktionen verknüpfen
Zwei SUMMEWENN funktionen verknüpfen	Polynomfunktion
Mit vba Funktionen in Excel Zellen	Interior.ColorIndex
Rang-Funktion für Strings?	Skript funktioniert nur auf einer seite?!?!
Hyperlink auf Excel-Datei funktioniert nicht	Public Funktion / Variabel
VBA - Suchfunktion - Fehlermeldung	Benutzerdefinierte Funktion
Userform mit Löschfunktion	Frage zu Wenn Dann Funktion
Wenn-Funktion	Colorindex Excel-Word RGB-Werte
Frage zur Funktion DISAGIO	Funktion um Chart zu kreieren
Wenn-Funktion verschachtelt	VBA Suchfunktion erweitern
Makro funktioniert nicht richtig	Kombination von INDEX/Vergleich für Wertevergleich
zählenwenn-funktion mit mehreren kriterien	Funktion SVERWEIS
Benutzerdefinierte Funktion in Open Office	Funktion Dezimal -> Zeit/ Variablen-Deklaration
Probleme mit Textfunktionen	Fehler, wenn Variable in Funktion
VBA-Funktion analog =ZELLE("Zeile")	Gültigkeit funktioniert nicht!
Zellausrichtung funktioniert nicht	WENN-Funktion