Vytisknout stránku | Zavřít okno

Výběr z Excelu - možnost nenalezení

Vytištěno z: CAD Fórum
Kategorie: Autodesk - stavebnictví, strojírenství, CAD/GIS
Název fóra: iLogic a ETO
Popis fóra: Funkce a makra iLogic, Inventor Engineering to Order (ETO), automatizace a konfigurace výrobků
URL: https://www.cadforum.cz/forum/forum_posts.asp?TID=30899
Datum vytištění: 25.dub.2026 v 01:40


Téma: Výběr z Excelu - možnost nenalezení
Odeslal: Lukáš Záruba
Předmět: Výběr z Excelu - možnost nenalezení
Datum odeslání: 18.srp.2020 v 08:47
Zdravím, mám pravidlo které hledá v exelu a přiřazuje zpátky hodnoty. 
'2020_08_17 - PŘIŘAZENÍ SKLADOVKY PODLE POLOTOVARU
Dim MyArrayList As New ArrayList
MyArrayList = GoExcel.CellValues("C:\Users\Public\Documents\Autodesk\Inventor 2015\Templates-BH\BH\OSTATN�\MATERIAL.xls", "POLOTOVAR", "A4", "A60")

Dim SN As String
SN = iProperties.Value("Project", "Description")

For MyRow = 4 To 60
            If SN = (GoExcel.CellValue("A" & MyRow)) Then
            oProp1 = GoExcel.CellValue("B" & MyRow )
            Exit For
        End If
Next
            Try
            iProperties.Value("Project", "Stock Number") = oProp1
                Catch
                End Try
Potřebuji všek toto pravidlo doplnit o možnost:
1) řádek nenajde 
2) řádek najde ale sloupec B je prázdný

v těchto obo případě zapsat do oProp1 ="Není" 

- líbila by se mi i možnost že by mezi případy uměl rozlišit :

1 ) řádek nenejde (v tomto případě zapsat do oProp1 ="Záznam neexistuje" )
2) řádek najde ale sloupec B je prázdný (v tomto případě zapsat do oProp1 ="doplň skladovku do excelu" )

- Ps pokud je toto pravidlo kostrbaté, rád sinechám poradit jak to učesat. Pravidlo vzniklo z jiného "přidání virtuální součásti z excellu".

Předem děkuji




-------------
Budu rád za radu i případně všelijaké postřehy.



Odpovědi:
Odeslal: Vladimír Michl
Datum odeslání: 18.srp.2020 v 17:17
Zkuste se podívat na FindRowStart. Jinak chybový výsledek z CellValue je vracen jako hodnota Nothing.

-------------
Vladimír Michl (moderátor)
ARKANCE CZ - https://arkance.world - arkance.world
(podpora viz helpdesk.arkance-systems.cz)



Vytisknout stránku | Zavřít okno