Folha+de+Verificação+e+PARETO 1

6
Conteúdo sobre qualidade total e gestão Folha de Verificação Reclamações de Clientes EMPR MOTIVO RECLAMAÇÂO A B Atraso na Entrega 14 7 4 0 Resitência não conforme 3 5 Diâmetro não conforme 12 7 Erros na Fatura 1 3 2 1 TOTAL 36 23 Entregas não estao sendo feitas conforme o especificado Assistência Técnica Ineficiente

description

Pareto

Transcript of Folha+de+Verificação+e+PARETO 1

Lista de VerificaoContedo sobre qualidade total e gestoFolha de VerificaoReclamaes de ClientesEMPRESAMOTIVO RECLAMAOABCOUTRASTOTALAtraso na Entrega1476330Entregas no estao sendo feitas conforme o especificado40004Resitncia no conforme352111Dimetro no conforme1278229Erros na Fatura13004Assistncia Tcnica Ineficiente21317TOTAL362319785FaturamentoR$ 780,721.00R$ 2,321,090.00R$ 3,712,312.00R$ 621,092.00

ParetoContedo sobre qualidade total e gestoMotivos de Reclamaes de ClienteTotal%% Acum1Atraso na Entrega3035%35%2Entregas no estao sendo feitas conforme o especificado45%40%3Resitncia no conforme1113%53%4Dimetro no conforme2934%87%5Erros na Fatura45%92%6Assistncia Tcnica Ineficiente78%100%70%100%80%100%90%100%100%100%110%100%120%100%130%100%140%100%150%100%160%100%170%100%180%100%190%100%200%100%210%100%220%100%230%100%240%100%250%100%260%100%270%100%85

ATUALIZAR

Pareto OrdenadoContedo sobre qualidade total e gestoMotivos de Reclamaes de ClienteTotal%% Acum1Atraso na Entrega3035%35%2Dimetro no conforme2934%69%3Resitncia no conforme1113%82%4Assistncia Tcnica Ineficiente78%91%5Entregas no estao sendo feitas conforme o especificado45%95%6Erros na Fatura45%100%70%100%80%100%90%100%100%100%110%100%120%100%130%100%140%100%150%100%160%100%170%100%180%100%190%100%200%100%210%100%220%100%230%100%240%100%250%100%260%100%270%100%85

Pareto Ordenado

&APage &P%% Acum

Attribute VB_Name = "Plan4"Attribute VB_Base = "0{00020820-0000-0000-C000-000000000046}"Attribute VB_GlobalNameSpace = FalseAttribute VB_Creatable = FalseAttribute VB_PredeclaredId = TrueAttribute VB_Exposed = TrueAttribute VB_TemplateDerived = FalseAttribute VB_Customizable = True

Attribute VB_Name = "EstaPasta_de_trabalho"Attribute VB_Base = "0{00020819-0000-0000-C000-000000000046}"Attribute VB_GlobalNameSpace = FalseAttribute VB_Creatable = FalseAttribute VB_PredeclaredId = TrueAttribute VB_Exposed = TrueAttribute VB_TemplateDerived = FalseAttribute VB_Customizable = True

Attribute VB_Name = "Plan5"Attribute VB_Base = "0{00020820-0000-0000-C000-000000000046}"Attribute VB_GlobalNameSpace = FalseAttribute VB_Creatable = FalseAttribute VB_PredeclaredId = TrueAttribute VB_Exposed = TrueAttribute VB_TemplateDerived = FalseAttribute VB_Customizable = True

Attribute VB_Name = "Mdulo1"

Attribute VB_Name = "Mdulo3"

Attribute VB_Name = "Mdulo2"

Attribute VB_Name = "Mdulo5"Sub Macro1()Attribute Macro1.VB_Description = "Macro gravada em 22/10/2009 por JoseRicardo"Attribute Macro1.VB_ProcData.VB_Invoke_Func = " \n14"'' Macro1 Macro' Macro gravada em 22/10/2009 por JoseRicardo'

' Range("B5:C31").Select Selection.Copy Sheets("Pareto ordenado").Select ActiveWindow.SmallScroll Down:=-6 Range("B5").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False ActiveWindow.SmallScroll Down:=-18 Range("B4:C31").Select Application.CutCopyMode = False Selection.Sort Key1:=Range("C5"), Order1:=xlDescending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal ActiveWindow.ScrollRow = 2 ActiveWindow.ScrollRow = 3 ActiveWindow.ScrollRow = 4 ActiveWindow.ScrollRow = 5 ActiveWindow.ScrollRow = 6 ActiveWindow.ScrollRow = 7 ActiveWindow.ScrollRow = 8 ActiveWindow.ScrollRow = 9 ActiveWindow.ScrollRow = 10 ActiveWindow.ScrollRow = 11 ActiveWindow.ScrollRow = 12 ActiveWindow.ScrollRow = 13 ActiveWindow.ScrollRow = 14 ActiveWindow.ScrollRow = 15 ActiveWindow.ScrollRow = 16 ActiveWindow.ScrollRow = 17 ActiveWindow.ScrollRow = 18 ActiveWindow.ScrollRow = 19 ActiveWindow.ScrollRow = 20 ActiveWindow.ScrollRow = 21 ActiveWindow.ScrollRow = 22 Range("B33").SelectEnd Sub

Attribute VB_Name = "Mdulo4"