If file contains certain text, how can I extract a string from the file and input it into a cell? (VBA)

Posted by Kristina Kotonika on Stack Overflow See other posts from Stack Overflow or by Kristina Kotonika
Published on 2012-09-13T21:36:30Z Indexed on 2012/09/13 21:37 UTC
Read the original article Hit count: 198

Filed under:

vba

|

if-statement

Say I have the following path and file name: P:\Actuary\Cash Flow Forecast\Annual and Quarterly Budget Data\ECMQA 2012Q1.xls

I want to write an if then statement that does the following (not sure if my statement is set up properly):

If InStr(1, "P:\Actuary\Cash Flow Forecast\Annual and Quarterly Budget Data\ECMQA 2012Q1.xls", "QA", vbTextCompare) > 0 Then
    BD.Sheets("Sheet1").Range("C2").value = "2012Q1"
End If

Instead of just inputting "2012Q1", I want it to automatically read this from the file. The thing is I am actually looping through 12 or so files and there's two types, "ECMQA 2012Q1.xls" (or ECMQB 2012Q2.xls and so on) AND "ECM Annual Budget 2012.xlsx"

If my file is the annual one (If file contains "Annual"), then I want:

BD.Sheets("Sheet1").Range("C2").value = "2012"

And i want it to read this from the actual file, same as the other one...not me putting in "2012"

Is there a way to do this?

Any help will be appreciated!

© Stack Overflow or respective owner

Related posts about vba

Tutoriel VBA/VB6 : Les extensions OpenGL en VBA et VB6, par Thierry Gasperment (Arkham46)

as seen on Developper.com - Search for 'Developper.com'
Bonjour à tous! Voici un article sur la programmation des extensions OpenGL, en VB6/VBA Cet article décrit l'utilisation de quelques extensions fréquemment utilisées : - Les VBO (vertex buffer objects) pour améliorer les performances - Les textures 3D pour réaliser des textures continue sur… >>> More
VBA : Obliger une saisie numérique dans une TextBox - Approche d'une résolution de besoin en VBA niv

as seen on Developper.com - Search for 'Developper.com'
Bonjour, Ci-dessous, le lien vers un nouveau tutoriel : « Approche d'une résolution de besoin en VBA - niveau débutant - Obliger une saisie numérique dans une TextBox » Le but de ce tutoriel est : De présenter une bonne approche de la résolution d'un problème simple en VBA. D'expliciter en… >>> More
Run VBA macro when condition is met

as seen on Stack Overflow - Search for 'Stack Overflow'
Hello all, I'm creating a spreadsheet to train my numerical skills. Now, I use VBA macros to generate a new problem once the current one has been correctly solved. To do so, I still have to press a button in the worksheet, which costs time and is annoying. Is there a way that I can execute a… >>> More
Offset the tickmarks of a secondary axis

as seen on Super User - Search for 'Super User'
I would like to offset the tickmarks of a secondary axis in excel WITHOUT changing the minimum. Here is a very complicated VBA class that apparently solves the issue but I would like a solution that doesn't require me to construct my entire chart in VBA. Here is an example of what I mean (I removed… >>> More
Excel 2007 VBA macros don't work in Parallels

as seen on Super User - Search for 'Super User'
I've got a complex Excel spreadsheet I need to use at work. My colleagues use the spreadsheet on Windows PC's, with no special configuration required. I want to run it on a MacBook Pro running Snow Leopard. The spreadsheet contains VBA macros which connect to external Oracle db's over the Internet… >>> More

Related posts about if-statement

Performance of if statement versus switch statement

as seen on Stack Overflow - Search for 'Stack Overflow'
Hi Everyone, I have an if statement with 16 cases (I am checking the state of four boolean variables). Would there be any value in trying to implement this differently, with nested switch statements perhaps? What is the actual performance gain of a switch statement over an if statement? Thanks! >>> More
C# SQL Statement transformed TO LINQ how can i translate this statement to a working linq

as seen on Stack Overflow - Search for 'Stack Overflow'
I am having trouble with this I have 3 Data tables i use over and over again which are cached I would like to write a LINQ statement which would do the following is this possible? T-SQL VERSION: SELECT P.[CID],P.[AID] ,B.[AID], B.[Data], B.[Status], B.[Language] FROM MY_TABLE_1 P JOIN ( … >>> More
ms sql use like statement result in if statement

as seen on Stack Overflow - Search for 'Stack Overflow'
declare @d varchar set @d = 'No filter' if (@d like 'No filter') BEGIN select 'matched' end else begin select 'not matched' end the result of above is always not matched can anybody tell me why and how can I use the like or '=' result in my stored procedure. thanks >>> More
Using a Case statement within the values section of an Insert statement

as seen on Stack Overflow - Search for 'Stack Overflow'
Please forgive my ignorance and poor SQL programming skills but I am normally a basic SQL developer. I need to create a trigger off the insertion of data in one table to insert different data into another table. Within this trigger I need to insert certain data into the new table based upon values… >>> More
How to join dynamic sql statement in variable with normal statement

as seen on Stack Overflow - Search for 'Stack Overflow'
I have a quite complicated query which will by built up dynamically and is saved in a variable. As second part i have another normal query and i'd like to make an inner join between these both. To make it a little more easier here is a little example to illustrate my problem. For this little example… >>> More