How can I parse an outlook table using vba, to automatically update quickparts? -

-

i have tried find answer question without success, apologies if has been asked before.

i have outlook message table containing table, want parse using vba create or update quick part entries.

the table looks :

+-----+--------------+--------------+ | xxx |            |       b      | +-----+--------------+--------------+ |  1  |   samplea1   |   sampleb1   | +-----+--------------+--------------+ |  2  |   samplea2   |   sampleb2   | +-----+--------------+--------------+ |  3  |   samplea3   |   sampleb3   | +-----+--------------+--------------+

my objective generate quick parts id example "xxxa1" , corresponding text "samplea1".

the id constructed first cell of table , row , column headers, , values corresponding cell contents.

i hope clear.

any appreciated. chris

ok, i've managed read table, can't find how access quickparts store i've read.

my code far looks this.

sub parsetable2quickparts()     dim objol outlook.application     dim objns outlook.namespace     dim objdoc object 'word.document     dim objsel object 'word.selection      dim ctitle string     dim acrow(10) string     dim nrow integer     dim accol(10) string     dim ncol integer     dim acvalues(10, 10) string      on error resume next     set objol = application     if objol.activeinspector.editortype = oleditorword         set objdoc = objol.activeinspector.wordeditor         set objns = objol.session          set objsel = objdoc.windows(1).selection          objsel.move wdstory, -1         objsel.move wdtable, 1         objsel.expand 12         ctitle = left(objsel.text, len(objsel.text) - 2)          ncol = 2 3            objsel.move wdrow, 0            objsel.move wdcell, 1            objsel.expand 12            accol(ncol) = left(objsel.text, len(objsel.text) - 2)         next          nrow = 2 4            objsel.move wdrow, 1            objsel.move wdcell, 0            objsel.expand 12            acrow(nrow) = left(objsel.text, len(objsel.text) - 2)         next          objsel.move wdstory, -1         objsel.move wdtable, 1         nrow = 2 4             objsel.move wdrow, 1             ncol = 2 3                 objsel.move wdcell, 1                 objsel.expand 12                 acvalues(ncol, nrow) = left(objsel.text, len(objsel.text) - 2)             next         next          objsel.move wdstory, 1         nrow = 2 4             ncol = 2 3                 objsel.insertafter ctitle & accol(ncol) & acrow(nrow) & " => " & acvalues(ncol, nrow) & vbcrlf             next         next      end if     set objol = nothing     set objns = nothing  end sub

i need replace final nested loops store i've read rather dump message. can point me in right direction ?


Comments

Post a Comment

Popular posts from this blog

Java 3D LWJGL collision -

-
i making 3d java game lwjgl library, , wondering how add collision detection, player not go through models. i using obj models. here objloader class, loads models: package renderengine; import java.io.bufferedreader; import java.io.file; import java.io.filenotfoundexception; import java.io.filereader; import java.util.arraylist; import java.util.list; import models.rawmodel; import org.lwjgl.util.vector.vector2f; import org.lwjgl.util.vector.vector3f; public class objloader { public static rawmodel loadobjmodel(string filename, loader loader){ filereader fr = null; try { fr = new filereader(new file("res/"+filename+".obj")); } catch (filenotfoundexception e) { system.err.println("couldn't load file!"); e.printstacktrace(); } bufferedreader reader = new bufferedreader(fr); string line; list<vector3f> vertices = new arraylist<vector3f...
Read more

spring - SubProtocolWebSocketHandler - No handlers -

-
i have ugly error during deploying spring app on jboss. 18:11:16,025 error [org.apache.catalina.core.containerbase.[jboss.web].[default-host].[/consumer]] (msc service thread 1-7) exception sending context initialized event listener instance of class org.springframework.web.context.contextloaderlistener: org.springframework.context.applicationcontextexception: failed start bean 'subprotocolwebsockethandler'; nested exception java.lang.illegalargumentexception: no handlers @ org.springframework.context.support.defaultlifecycleprocessor.dostart(defaultlifecycleprocessor.java:176) [spring-context-4.1.3.release.jar:4.1.3.release] @ org.springframework.context.support.defaultlifecycleprocessor.access$200(defaultlifecycleprocessor.java:51) [spring-context-4.1.3.release.jar:4.1.3.release] @ org.springframework.context.support.defaultlifecycleprocessor$lifecyclegroup.start(defaultlifecycleprocessor.java:346) [spring-context-4.1.3.release.jar:4.1.3.release] @ org.s...
Read more

methods - python can't use function in submodule -

-
my folder structure this: pythonstuff/ program.py modulea/ __init__.py foo.py bar.py here's code bar.py : def hello(): print("hello, world!") here's code program.py : #!/usr/bin/env python3 modulea import bar bar.hello() i run $ python3 program.py somehow error: file "program.py", line 3, in <module> bar.hello() attributeerror: 'module' object has no attribute 'hello' edit: __init__.py file empty. edit2: after trying realized had bar.py in root directory contained hello() method. bar.py in modulea/ directory empty. add it import os __all__ = [] module in os.listdir(os.path.dirname(__file__)): if module != '__init__.py' , module[-3:] == '.py': __all__.append(module[:-3]) the init .py files required make python treat directories containing packages; done prevent directories common name, such string, unintentionally hiding v...
Read more